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Preface 



This manual is the second in a series of two volumes. The reference 
information combined in these' two manuals is provided as a DOS/VS 
serviceability aid and is, therefore, a summary of other DOS/VS 
documentation. These manuals are intended for use by persons 
involved in program support. 

The two volumes contain the following information: 

Volume 1,SY33-8571: 

Chapter I : System/370 General Information 
II : DOS/VS General Information 
III: DOS/VS IOCS (General, SAM, DAM, ISAM) 
IV: DOS/VS Supervisor Control Blocks and Areas 

V : DOS/VS Service Aids 

Volume 2, SY33-8572: 

I : POWER/VS 

II : VTAM Control Blocks 
III: .VSAM Control Blocks 
IV: Model 20 Emulator 

V : 14xx Emulator 
VI: BTAM 

If there is any discrepancy between the information contained in this 
manual and the DOS/VS optional programming material (for example, 
PLMs and listings), the latter is assumed to be correct. 



Fifth Edition (July, 1977) 

This is a major revision of, and obsoletes, SY33-8572-3. It appUes to 
Version 5, Release 34, of the IBM Disk Operating System/Virtual 
Storage, DOS/VS, and to all subsequent versions and releases until 
otherwise indicated in new editions or Technical Newsletters. Changes 
are Continually made to the information herein; before using this 
publication in connection with the operation of IBM systems, consult 
the latest IBM System 1 370 Bibliography, GC20-0001 , for the editions 
that are applicable and current. 

Requests for copies of IBM publications should be made to your IBM 
representative or to the IBM branch office serving your locality. 

A handbook-sized binder, FE Part Number 453559, may be purchased 
from IBM. Customer may order it through their IBM marketing 
representative. IBM personnel should order it as an FE part from 
Mechanicsburg. 

This manual has been prepared by WT-DP/CE Technical Operations, 
Poststrafie 40, D-7030 Boeblingen, Germany. 

A form for readers' comments is provided at the back of this 
pubhcation. If the form has been removed, comments may be sent 
to the above address. Comments become the property of IBM. 

© Copyright International Business Machines Corporation, 1974, 1975, 1976, 1977. 
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PROGRAMMING REQUIREMENTS FOR POWER/VS 



PROGRAMMING REQUIREMENTS 











1 




1 








During generation of the DOS/ 




The follow 


ng phases must be 




Number of entries in the LUB 




I/O Files 


VS supervisor POWER=YES in 




cataloged 


ntheCIL: 




table (in the DOSA^S supervisor). 






SUPVR macro forces 




IPW$$I1 


IPWSSPP 




belonging to the POWER^S 




The Queue file and Date file must be 






IPW$$I2 


IPW$$XR 




partition must be large enough 




assigned to a spooling device. 


o PHO-YES 




IPW$$NU 


IPWSSXW 




to accommodate all reader and 






o PFIX=YES 




IPWSSCP 


IPWSSXJ 




writer tasks that may be running 






o ECPREALbYES 




1PW$$GD 


IPWSSTR 




concurrently. Programmer LUBs 




Queue file SYSOOl thru SYS006 


and if NPARTS^l, or is 




IPWSSPD 


IPWSSLU 




SYSOOO thru SYS006 are reserved 




Data file(s) 


not specified 




IPW$$AQ 


IPWSSPS 




for the account, queue, and data 






o NPARTS=3 




IPW$$RQ 
IPWSSNQ 


IPW$$SL 
IPW$$IC 




files. 




Queue file and Data file extents must 




o XECB=YES (optional) 




IPWSSDQ 
IPW$$FQ 
IPW$$PR 
IPW$$LR 
IPW$$PL 
IPWSSLW 


IPWSSSC 

IPWSSER 

IPWSSOE 

IFWSSOT 

$$BPOWIN 

$$BSGMNT 








be defined on the SYSRES label 
information cylinder. 






and the macro POWER must be 














cataloged i 


n the SSL. The 
















SEGMENT 


mac 


ro is optional. 












1 






' 








' 


See next page 











PROGRAMMING REQUIREMENTS FOR POWER/VS 



For POWERAS RJE, BSC 
(optional) 



The phases IPW$$TM and 
IPwiSMS must also be 
cataloged in the CIL and 
the macros PLINE and 
PRMT must be cataloged 
in the SSL. 



For POWER/VS RJE, SNA 
(optional) 



For POWER/VS Spool 
Management (optional) 



The following phases must 
also be cataloged in the CIL 



IPWSIIB 

IPW$$LF 

IPW$$LH 

IPW$$LN 

IPW$$MD 

and the mac 



IPW$$MP 
IPW$$OC 
IPW$$OB 
IPW$$SN 
IPW$$VE 
5 PLINE, 



PCPTAB^ond PRMT must be 
cataloged in the SSL. 



The following phases must 
also be cataloged in the 
CIL: 

IPWSSPA 
IPW$$GA 
IPW$$SA 



The phase IPW$$SM must 
be cataloged in the CIL 
and the macros 
CTLSPOOL, PUTSPOOL, 
GETSPOOLand SPL must 
be cataloged in the SSL. 



For POWERAS Accounting 
(optional) 



JA=YES ornl through nx 
must be specified in the 
FOPT macro during generot 
of the DOSA'S supervisor. 



An Account file must be 
assigned to SYSOOO, a 
spooling device. Account 
file extents must be 
defined on the SYSRES 
label information cylinder. 



RELATIONSHIP BETWEEN A QUEUE SET, QUEUE RECORDS, AND A QUEUE ENTRY 



queue record 



L 



queue record 



queue record 



queue record 



_ J 

a Queue Entry 



— W track group 



-« track group 



— « track group 



— w track group 



Queue file 
SYSOOl 



Data file 
SYS002 



FREE QUEUE SET 



p Q) (D 

3ster record ti queue record J queue record M queue record 



MRQF field in master record 

(2) QRNS field in queue record (zero=last) 



CLASS CHAIN AND QUEUE SET 



class table *■■ 
in DMB 



2 



firsf-in-set queue record 

1 ¥ 



first-in-set queue record -5 



'T 



first-ln-set queue record 



next-in-set queue record -5 — j y » last-in-set queue record 



-^/- 



,J 



1 CTQF field in class table entry 

2 CTQL field in class table entry (zero means last in chain) 

3 QRQN field in queue record 

4 QRQP field in queue record 

5 QRNS field in queue record (zero means last in chain) 



_ J 



INTERFACES AND TASK STRUCTURES 



©-4 



DOSAS SUPERVISOR 



SVCO 
APPENDAGE 



Posts appropriate 

execution 

processor task 

and sets 

POWER/VS 

partition 

dispatchable 



HOT READER 
APPENDAGE 



Locates appropriate 
reader task and 
posts it 
dispatchable 



® 



® 



exec. RDR task 
exec, LST task 
exec. PUN task 



PAGE FAULT 
APPENDAGE 



Pre-processor 



Changes next 
sequential 
instruction in PSW 
to task manage- 
ment to select 
another task 
during processing 
of the page fault. 
Queues page 
faults before 
returning to page 
manager 



Post-processor 



Posts appropriate 
task dispatchable 
and sets POWER/VS 
dispatchable. 
Returns next page 
fault in queue to 
page manager 



® 



ATT. INTERFACE 
APPENDAGE 



Verifies and passes 

potential 

POWER/VS 

command; posts 

command 

processor task 

dispatchable. 



(A) CPtc 



SVC 90/91 
APPENDAGE 



Passes DOS/VS 
and user job 
accounting 
information to 
execution account 
record area; posts 
execution reader 
task dispatchable 



IPW$$NU 

task management 



Scans for TCB of 
task with highest 
priority ready to 
run and dispatches 
it. 



^ 



® 



RJE CHANNEL END 
APPENDAGE 



Queues BCA in 
BCA chain and 
posts line manager 
task dispatchable 



exec. RDR task 



RJE line 
manager task 



^ 



1* J * From any task issuing 
POWEi^VS wait or 
detach 



SVC 7 when no 



task dispatchable 



►® 



L^^ any task (at post-processor) or 
'' task management (at pre-processor) 



INTERFACES AND TASK STRUCTURES 



(....Cont 'd) 



^ 



LOCAL READER TASK 



IPW$$PR or IPW$$ER 



RJE, BSC READER TASK 



IPWSSTM 

Reads cards from terminal 
device (using RTAM 
routines) and links to 
logical reader. 



RJE, SNA READER 
TASK 



IPWSUB 



EXECUTION READER 
TASK 



IPW$$XR 



EXECUTION LIST/ 
PUNCH TASK 



IPW$$XW 



Reads cards into physical 
data area (PDA) and 
links to logical reader. 



Reads data from terminal 
devices using VTAM 
macros and links to 
logical reader. Writes 
data record to logical 
record area (WALR). 



1 



IPW$$LR 



IFWSSLR 



IPW$$LR 



Writes data records to 
data file from logical 
record area (WALR) and 
creates queue entry 
by means of function 
routines. 



Writes data records to 
data file from logical 
record area (WALR) and 
creates queue entry 
by means of function 
routines. 



Writes data records to 
data file from logical 
record area (WALR) and 
creates queue entry by 
means of function 
routines. 



Emulates reader I/O 
requests from user 
program into read 
operations from data 
file. 

Invokes execution 
list/punch writer task 
whenever list or 
punch I/O request 
to be emulated. 



Functions used by 
IPWSSPR, IPW$$ER and 
IPWSSLR 

RQ,AQ,PD,DQ,FQ, 
PA,LU,SC,OE 



Functions used by 
IfWSSTM and IPW$$LR 



Functions used by 
IPW$$IBand IPW$$LR 



Functions used by 
IPW$$XR 



RQ,AQ,PD,DQ,FQ/. 
PA,LU,SC,IC,MS 



RQ,AQ,DQ,FQ,PD, 
PA,SC,IC 



GD,NQ,DQ,FQ,PA, 
XJ,SL 



Services used 
TM,RM,SM,\AS,DS,TIS 



Services used 
TM,RM,SM,MS,DS,TIS 



Services used 



Emulates list I/O 
requests from user 
program into write 
operations to data file 
and creates a queue 
entry by means of 
function routines. 



Functions used by 
IFWSSXW 



RQ,AQ,PD, OT 



TM,RM,SM,MS, TIS 



TM,RM,SM,MS,DS/VS 



^ 



^ 



^ 



^ 



^ 



INTERFACES AND TASK STRUaURES 



(....Cont'd) 



Links to logical writer 
and prints lines from 
physical data area 
(PDA) 



^ 



LOCAL LIST TASK 



IPWSSPL 



IPW$$LW 



Reads data records from 
data file using 
information from queue 
records belonging to 
queue entry by means 
of function routines 



Functions used by 
IPWSSPL and IPW$$LW 



LOCAL PUNCH TASK 



IPWSSPP 



Links to logical writer 
and punches cords from 
physical data area 
(PDA) 



IPW$$LW_ 

Reads data records from 
data file using 
information from queue 
records belonging to 
queue entry by means 
of function routines 



Functions used by 
IPWSSPP and IPWSSLW 



RJE, BSC LIST/PUNCH 
TASK 



IFWSSTM 



Links to logical writer 
and prints lines at 
terminal using RTAM 
routines 



_I_PWSSLW 

Reads data records from 
data file using 
information from queue 
records belonging to 
queue entry by means 
of function routines 



Functions used by 
IPWSSTMand IPW$$LW 



RJE, SNA LIST/PUNCH 
TASK 



IFWSSOB 



Links to logical writei 
and prints lines, or 
punches cords at terminal 
using VTAM macros . 



IPWSSLW 

Reads data records from 
data file using informatic 
from queue records be- 
longing to queue entry 
by means of functions. 



Functions used by 
IPWSSOB and IPWSSLW 



COMMAND 
PROCESSOR TASK 



IPWSSCP 



Builds and attaches 
tasks into task selection 
list, initiates termination 
of tasks, or changes 
status queue entries 
according to command 
received 



Functions used by 
IPWSSCP 



^ 



NQ,DQ,FQ,PA,LU 



NQ,DQ,FQ,PA,LU 



NQ,DQ,FQ,PA,LU, 
MS,IC 



NQ,DQ,FQ,PA 



AQ,DQ,FQ,LU 



Services used 
TM,RM,SM,MS,DS 



TM,RM,SM,MS,DS, 
TS,TIS 



TM,RM,SM,MS,DS, 
TS,TIS 



TM,RM,SM,MS,DS, 
TS,TIS 



^ 



TM,RM,SM,AAS,DS,TS, 
TIS 



^ 



INTERFACES AND TASK STRUCTURES 



Cont'd) 



SAVE ACCOUNT TASK 



IPW$$SA 



STATUS TASK 



IFW$$PS 



INITIATOR 
TERMINATOR TASK 



IPW$$I2 



TASK TERMINATOR 
TASK 



IPW$$TR 



RJE, BSC LINE 
MANAGER TASK 



IPW$$TM 



Reads account file 
using a function routine 
and writes the account 
records to disk, tape or 
punch device, or deletes 
the file, or links to 
logical reader to spool 
cards to be punched 



Reads queue file 
records using function 
routines and prints 
queue status informa- 
tion on. a printer 
device. 



IPWSSLR 



Writes records to 
data file and 
creates queue entry 
using function 
routines 



Loads nucleus and all 
required modules into 
partition at initiation 
time. Opens POWER/VS 
files and links to logical 
reader and writer for 
autostart. Then waits for 
request as terminator. 
Closes POWER/VS files 
and restores partition 
for normal DOS/VS 
operation. 



Handles PSTOP from 
logical reader/writer 
tasks and I/O error or 
WLR error conditions 
On error conditions, 
files ore restored to 
their possible status. 
Task uses TCB of task to 
be terminated or to be 
recovered from I/O 
error. 



Initiates and terminates 
lines, processes sign 
on/off, recovers from 
line errors, interfaces 
with RTAM routines. 



IPW$$LR,IPW$$LW 



Process autostart 
initiation. 



Functions used by 
IPW$$SA 



Functions used by 
IPW$$PS 



Functions used by 
IPW$$I2 



Functions used by 
IPW$$TR 



Functions used by 
IPW$$TM 



LU,MS 



PA, GA, IC, LU 
IPW$$TM, SSBPOWIN 



AQ,DQ,FQ,PD, 
PA, GA, LU 



Services used 
TM,RM,SM,MS,DS 



Services used 
TM,SM,MS,DS 



Services used 
TM,SM,AvAS,DS,TIS 



Services used 

TM,RM,SM,MS,DS,TS 
H 



Services used 
TM,SM,MS 



'W 



W 



^ 



^ 



W 



INTERFACES AND TASK STRUCTURES 



RJE, SNA, 
MANAGER TASK 



RJE, SNA 
LOGON TASK 



IPvVSSLN 



RJE, SNA 
LOGOFF TASK 



RJE, SNA 
MESSAGE TASK 



RJE, SNA 
LOGON TASKl 



RJE, SNA 
VTAM EXITS 



Activates SNA 
processing routines 
for each logical unit. 
Attaches DOS/VS 
subtask to open the 
interface between 
VTAM and POWER/ 
VS. 



Verifies LOGON data 
and creates control 
blocks for a logical 
unit, attemption to 
LOGON to 
POWER/VS. 



Terminates a session 
between a logical l 



Writes messages to 
the logical unit 
using VTAM macros. 



Establishes the 
session between a 
logical unit and 
POWER/VS. 



Functions used by 
IPWSSlf 



Services used 



Interface between 
VTAM and POWER/VS 

process LOGON, 
TPEND 

(VTAM HALT), 
LOSTERM 

(LOGOFF etc.) and 
DFASY (SIGNAL) 
requests. 



TM,RM,SM,MS 



W 



w 



"w 



w 



RM, TM,SM,MS,TIS 



POWER/VS OPERATOR COMMAND LANGUAGE (POCL) 



POWER/VS provides an Operator Command Lnnguage (POCL) which allows the central 
system operator and the remote terminal operator to communicate with the system. Four 
types of command are provided. 

o Task Management Commands allow the operator to initiate and terminate POWER/VS 

Tasks. 

Task management commands are only applicable to the RJE writer fosk. The reader 
task is started by the central operator when he brings up the line. Its operation is 
controlled by the system. 

Queue Management Commands allow the operator to display and modify the contents 

of POWER/VS Queue Entries. 

Queue management commands ore only applicable to jobs that are submitted by or routed 
to the some remote ID as the one issuing the command. 



o List control commands allow the operator to perform certain device-dependent 

operations on line printers. 

Following table shows the abbreviated and extended command codes available to the central 
operator : 



Type 


Extended 


Abbreviated 


Function 




format 


format 




Task 


P START 


S 


start a task or partition 


management 


PSTOP 


P 


stop a task or partition 




PGO 


G 


activate a task or partition 




PEND* 


- 


end POWER/VS execution 




PCANCEL 


C 


cancel a POWEIV'VS status report 




PFLUSH 


F 


flush an active job entry 




PRE START 


T 


restart a write task 


Queue 


PDISPLAY 


D 


display a job status 


management 


PALTER 


A 


alter attributes 




PDELETE 


L 


delete a job entry or a message 




PRE LEASE 


R 


release a job entry 


Miscellaneous 


PBRDCST 


B 


transmit a message 




PINQUIRE 


1 


check terminal status 




PACCOUNT 


J 


process account file 




PSETUP 


u 


print page layout 



The one-character operation code for PEND(E), is not 
supported, since the operator might inadvertently 
end the execution of POWER/VS. 



POWER/VS OPERATOR COM^^AND LANGUAGE (POCL) (...Continued) 



Task Management commands 



Operation 


Operand 


Comments 


J PSTART 




task, uraddr, [class] [,2] 




task : RDR,LST,PUN or RJEline 


1= 1 




task, uraddr, tapeaddr 
partition [, [class], [auto- 




uraddr : Its format is either : 
cuu or X'cuu'. 


(non-diskette) 




class], mt] 
RJE, lineaddr r,password] 




lineaddr : Its format is either : 
cuu or X'cuu'. 






tapeaddr : Its format is : 






X'cuu'. 


f 1 




password : Any combination of 


PSTART 1 


RDR,uraddrl,class2, 


up to eight alpha- 


1= 1 


uraddr 2 


numeric characters, 
class : The meaning of this 


(diskette 




parameter depends on 


data -mode 




the type of task to be 


processing) 




started. 

For a write task, "class" 


[pstartI 


RDR,uraddr 2 ndassl 


defines the output 


\s 1 


[fMe-M] 


class(es) upon which 
the task operates . Up 


(diskette 
sysin-mode 




1 




to four classes can be 
designated by specifying 


, number-of-diskettes 


processing) 


I- -I 


one to four alphabetic 




[.s]M 


characters from A 
through Z. The order 
specified is the order in 
which the classes will 
be processed. If no class 
parameter is specified, 
only class A is selected. 

For a read task, "class" 
defines the input class 
that is assigned to all 
jobs without a class 
specification in their 
* $$ JOB cards, when 
no CTL statement is in 
effect. It maybe 
specified as an alpha- 
meric character from 
A through Z or from 
through 4. If no class 
parameter is specified, 
class defaults to A. 



I 



POWER/ VS OPERATOR COM\4AND LANGUAGE (POCL) (. . .Confinued) 



Task Management commands ( continued) 



Operation 



Operand 



Comments 



PSTART, 
S (c'ntd) 



doss : For a partition, "class" 
(c'ntd) defines the input 

class(es) that can be 
executed in this 
partition. Up to four 
classes can be designa- 
ted by specifying one 
to four alphameric 
characters from A 
through Z or from 
through 4, The order 
specified is the order 
in which the classes 
will be executed. If 
no class is specified, 
only job entries with 
matching partition- 
type (0-4) input class 
are selected 

partition : BG, Fl through Fn. 

uroddr 1 : physical device 

address of cardreoder 
in form X'cuu' or cuu 
uroddr 2: physical device 
address of 3540 
diskette in form 
X'cuu' or cuu. 
file-id : File name as in HDR 1 
label of the diskette 
Con be specified with 
or without quotes. 
Blank characters are 
only allowed when 
filename sjjecified 
within quotes, 
number-of -diskettes : 

Can be one to three 
digits, allowed 
values from 1 to 255 
S : Volume sequence checking. 
Sequence numbers must start 
with 1 and be incremented 
by 1. When omitted, no 
checking will take place. 
V: File verification. When 
omitted, verify field in 
HDRl label is ignored. 



POWER/VS OPERATOR COAAMAND LANGUAGE (POCL) (.. .Continued) 
Task Management commands (. . .Continued) 



I 



Operation 


Operand 


Comments 


PSTOP 
|P 


< 


uraddr ,EOJ 

[_, RESTART] 
partition 
lineaddr [^EOj] 

RJE,SNA,Luname [, EOj] 


> 


uraddr : Format is : 

cuuorX'cuu'. 

RESTART: Applies only to 

output processing, 
partition : BG, Fl through Fn. 

lineaddr: its format is either : 
cuuorX'cuu'. 


/PGO] 
iG J 


. uroddr 1 
partition, cuu | 


uraddr : its format is either 

partition, cuu : specifies the 
partition and 
unit record 
device address 
whose output 
is being 
spooled to tape. 


PEND 


uraddr "1 
KILL [, uraddr] 


uraddr : its format is either 
cuu or X'cuu'. 

KILL: Terminates POWER/VS 
immediately . Partitions 
supported by POWEI^VS 
are also cancelled. 


/pcancelI 
\c J 


[status] 


STATUS : A confirmation 

message is issued. 


/pflushI 

[F 


uraddr [,H0LD] 1 
' partition [HOLD] 


uraddr : Its format is either 
cuuorX'cuu'. 

HOLD : specifies that the 

corresponding job entry 
is not to be deleted, 
but put in the hold 
state. 

partition : BG, Fl through Fn. 


[prestartI 

1^ i 


uraddr [,n] 


uraddr : Its format is either 
cuu or X'cuu' 

n : signed or unsigned 

value from to 9999. 



POWER/VS OPERATOR COMMAND LANGUAGE (POCL) (...Continued) 
Queue Management commands 



Operation 


Operand 


Comments 


f PALTER, 


queue, jobname r,jobnumber| 


queue : LST, PUN or RDR 


A 


ALL 1 


jobname : can be 2 to 8 


^ ■' 


*abc 


characters 




class 1 


Jobnumber : may be 1 to 5 




[;PRi = priority] 


digits long. 




f,DISP= disposition] 


*abc : requests to alter all job 




[:,CLASS = cIass2] 


entries that have the 




QCOPY = number of copies] 


first n characters of 




Q, REMOTE = rem id] 


their jobnames in 




[■,CMPACT = namejno|*] 


common, "abc" 
represents any 
combination of from 
one to seven 
alphameric characters, 
class 1: specifies class of job 
entries to be altered. 
Can be any alphabetic 
charcater (A-Z) and for 
input classes also from 
0-4. 
priority : A single digit from 
to 9. Nine is the 
highest priority, 
disposition : can be H,K, L or D. 
class 2: any alphabetic character 
(A-Z). Also, specifications 
from through 4 are 
allowed for input classes, 
number of copies : can be from 

0to99. 
remid : can be specified as any 
number from to 200. 
'0' indicates the central 
location, 
name: specifies the name of 
the compaction table, 
no: no compaction is to 

be performed. 
* : the default compaction 
table is to be used (as 
specified in the PRMT 
Macro). 



POWER/VS OPERATOR COMMAND LANGUAGE (POCL) (.. .Continued) 
Queue Management commands (continued) 



Operation 


Operand 


Comments 


IpdeleteI 




" queue, jobname r,jobnumberT 


queue : LST, PUN or RDR. 


U J 




queue, ALL 


jobname :Can be 2 to 8 alphameric 






queue, class 


characters. 






queue, *abc 


jobnumber : Can be 1 to 5 digits 






MSG r,nl 


long 






*abc : All job entries with the 






same first n charcater. 






are to be deleted, "abc" 






represents any combination 






of up to seven alphameric 






characters. 






MSG, n : ALL USERS-type 






message number n is 






to be deleted. 


fpDlSPLAY 




queue, jobname [,iobnumber| 


queue : LST, PUN or RDR 


Id J 




queue QALL] 


jobname : Can be 2 to 8 






queue, HOLD 


characters. 






queue, FREE 


jobnumber : Can be 2 to 5 






queue, RJE [,remid] 


digits 






queue, LOCAL 


ALL : If queue parameter is 






queue, *abc 


not specified, status 






queue, class 


information on all 






ALL [Tlistaddr] 


entries in all queues 






HOLD 


is displayed on SYSLOG. 






FREE 


listaddr : Its format is : 






RJE [Tremid] 


cuu or X'cuu'. 






LOCAL 


class : Can be specified as a 






*abc 


character from A through 






MSG 


Z or from to 4 (input 






A 


class only). 






M 


*abc : specifies a request for the 






Q 


status of all job entries 






T ^ 


having the first n 






characters of their job- 






names in common. "abc" 






represents any combina- 






tion of from one to seven 






alphameric characters. 






If the queue parameter 






is not specified, status 






information is displayed 






for all queues. 


(preleaseI 


queue, jobname F, jobnumbeT] 


queue : LST, PUN or RDR. 


r J 


queue QALL] 


jobname : Can be 2 to 8 




1 queue, class 


alphameric 




queue, *abc 


characters, 
jobnumber : Can be 1 to 5 

digits long. 
*abc : all job entries with the 




same first n characters 






are to be released. 






"abc" represents any 






combination of up to 






seven alphameric 








characters . 



I jobs in H disposition 
I be released. 



POWER/VS OPERATOR COMMANDS LANGUAGE (POCL) (...Continued) 
Miscellaneous commands 



Operation 


Operand 


Comments 


/PINOUIRE 
1' i 


j lineaddr 
JALL 


luname:Name of a SNA 
logical unit, 
lineaddr : Its format is : 
cuu or X'cuu' 
ALL : Status of all supported 
lines are to be 
displayed 


JpbrdcstI 

1» J 


[remid 1 
ALLUSERS ' '*'"''] 


remid : Can be from 1 to 

200. A specification 
of ALLUSERS 
indicates all users, 
'text': Can be 1 to max. 

characters, 
max. : 46 char, for 
ALLUSERS 
49 char, for host to 

terminal 
60 char, for terminal 
to host. 


J paccountI 




tapeaddr|r filename] 
DISK, filename 
DEL 




If no operands specified, the 
account file is spooled to disk, 
tapeaddr : Can be : 

cuu 

X'cuu' 

cuu,ss 

X'cuu 'ss 

cuu'X'ss 

X'cuu', X'ss' 
filename : If specified, the file 

created will be a 

standard labeled tape 

file. May be 1 to 8 

alphameric characters 

long. 
DISK, filename : "filename" is 
1 to 8 alpha- 
meric 
characters long 


PSETUP 


uraddr Qn] 


uraddr : its format is : 
cuu or X'cuu' 

n : one or two digits that 
specify the number of 
pages to be printed. 



POWER/VS REMOTE OPERATOR COMMAND LANGUAGE (ROCL) 



There are four types of commands : _ 

o Terminal Control Commands allow the remote operator to Initiate and terminate I 

POWER/VSRJE tasks. I 

o Task Management Commands allow the operator'to initiate and terminate POWER/VS 

Tasks. 

o Queue Management Commands allow the operator to display and modify the contents 

of POWER/VS Queue Entries. 

o List Control Commands allow the operator to perform certain device-dependent 

operations on line printers. 



The following table Includes all valid commands. 



Type 


Command 


Function 


Terminal 


LOGON 


start an RJE,SNA user session 


control 


* . . SIGNON 


start an RJE,BSC user session 




* . . SIGNOFF 


terminate on RJE,BSC or RJE, SNA 
user session 




LOGOFF 


terminate an RJE, SNA user session 


Task 


* . . START 


start a writer task or message 


management 




queuing 




* . . STOP 


stop a writer task or message 
queuing 




* . . GO 


re-actlvate a writer task 




* . . FLUSH 


flush an activate job 




* . . RESTART 


restart a writer task 


Queue 


* . . DISPLAY 


display a fob status 


management 


* . . ALTER 


alter job attributes 




* . . DELETE 


delete a [ob or message 




* . . RELEASE 


release a job 




* . . BRDCST 


transmit a message 


List control 


* . . SETUP 


print page layout 



Commands entered from a cord reader must be submitted outside POWER/VS fob boundaries 

otherwise they are treated a user data. 

Format of RJE/BSC and RJE, SNA commands when entered from a card reader : 



1. identification field. Contains an *in column 1, blank in column 2, and 
. . (periods) in colums 3 and 4. Column 5 must be blank. 

2. Operation field. Specifies the RJE command. At least one blank must separate 
this field from the following field. 

3. Operand field. Contains one or more parameters, separated by commas. 
At least one blank must separate the operand field and the comments 
field. 



POWER/VS REMOTE OPERATOR COMMAND LANGUAGE (ROCL) (.. .Continued) 



Comments field. May contain any information considered helpful by the 
user. Continuation of the comments field is not allowed. 

The operation field, operand field, and comments field must be contained 
in columns 6 through 71. Column 72 must be blank. 

Sequence field. Sequence numbers are useful when a number of commands 
with the same operation code are submitted from a terminal. Columns 
73 - 80 are returned in diagnostic messages. 



1 . When entered from an SNA terminal keyboard, the POWER/VS RJE 
terminal commands must be specified without the identification 
field (*..). 



2. The short format of the POWER/VS RJE terminal commands may also 
be used by BSC-RJE, but must be preceeded by the ID field (*..). 



Operation 


Operand 


Comments 


LOGON 


APPLID (POWER) LOGMODE 


APPLID (POWER) Enter as such 




(name) DATAVemid' 


LOGMODE (name) = name of 




Tpasswordl Tuser informationl 


an entry in 
the VTAM 
logon mode 
table defined 
at VTAM 
generation 
DATA'remid'= 1 through 200 
password = up to 8 alphameric 

characters 
user information = up to 16 bytes 


*..SIGNON 


remid [, password] [, user 


remid : Remote users are 




information] 


identified by numbers 




from 1 to 200 




(Only supported for SNA 
users if generated in VTAM. 
The parameter fields must be 
preceded and followed by 


password : Can be any 

combination of up to 
eight alphameric 
characters 

user information : Up to 16 bytes 




a srngle quotation mark and 






kept in brackets) 


information, 
punched in 

56 to 71. 


* .. SIGNOFF 


(No operand) 


terminates a session by the 
remote BSC or SNA user. 


LOGOFF 


APPLID (POWER) TYPE [uNCOND 


APPLID(POWER) Enter as such 




[COND J 


TYPE (COND) Enter as such 
TYPE (UNCOND) Enter as such 



POWERM remote operator command language (ROCL) (...Continued) 
Task management commands 



Operation 


Operands 


Comments 


r* . . STARfl 
V..S ] 


[task 

{task, class 
[MSG 


task : LST or PUN 

class : Up to four classes can 
be designated by 
specifying one to four 
alphabetic characters 
from A through Z. 

MSG : specifies that all 

subsequent broadcast 
messages directed to 
this terminal are to be 
accepted. 


J* . . STOpi 
I* . . P J 


task 

Itask, EOJ 1 
Itask, RESTARTf 

MSG 


task : LST or PUN. 
EOJ : Stop until current entry 
has completed 
processing. 
RESTART : When the task is 
started again, 
processing will 
begin at the record 
following the last 
one processed 
before the STOP 
comment was issued . 
MSG : All subsequent broad- 
cast messages directed 
to the terminal are to 
be ignored. 


i* . . go] 

I* . . G J 


task 


task : LST or PUN 


/* .. flush] 

I* . . F i 


/task 1 
task, hold] 


task : LST or PUN 


I* . . restart] 

V..T J 


[task 1 
task, nJ 


task : LST or PUN 
n : Signed or unsigned value 
from to 9999. 



Queue Management commands 



Operation 


Operands 


Comments 


1* . . display] 

I* . . D J 


queue, jobname Tjobnummer] 
queue [,ALL] 
queue, HOLD 
queue, FREE 
queue, *abc 
( queue, class 
ALL 
HOLD 
FREE 
*abc 
MSG 
T 


queue : LST, PUN or RDR 
jobname : Can be two to eight 

alphameric characters 
jobnumber : One to five digits long, 
class : Can be specified as an 

alphameric chorcoter from A 
through Z, or from to 4. 
*abc : Requests the status of all 
entries having the first n 
characters of their jobnames 
in common. 
T : The time, date, the number 
of storage pages fixed and 
the number of tasks. 



POWER/VS REMOTE OPERATOR COMMAND LANGUAGE (ROCL) (...Continued) 
Queue Management commands (continued) 



Operation 


Operands 


Comments 


r* .. DISPLAY' 
<* .. D 
[(continued) , 




"abc" represents any 
combination of from 
one to seven characters. 
If the queue parameter 
is not specified, status 
information is displayed 
for all queues. 
MSG : Requests the display of 
all ALLUSERS-type 
messages that have been 
entered, together v/ith 
their originators and all 
operator messages routed 
specifically to this 
remote-id. Operator 
messages are automatically 
deleted when they are 
displayed. 


f* . . ALTER 
1*..A ] 


jobnome [, jobnumberl 
queue<ALL '• • 

*abc 
-(.class 1 J 
[,PRI=priority] 
^DlSP^isposition] 
GCLASS=class 2] 
COPY-number-of-copies] 
[,REMOTE=remidJ 


queue : LST, PUN or RDR. 

jobname : Can be two to eight 
alphameric 
characters. 

jobnumber : May be one to five 
digits long. 

priority : Specified as a single 

digit from to 9. Nine 
is the highest priority. 

disposition : Can be specified 
asH, K, L, orD. 

class 1 : class of which all job 

entries are to be altered 

class 2 : can be specified as 

any alphabetic character 
from A through Z. Also, 
specifications from 
through 4 are allowed 
for input classes. 

remid : can be specified as any 
number from to- 200. 
"0" indicates the central 
location. Only the "to" 
remote-id can be modir 
fied with an ALTER 
command; the "from" 
remote-id cannot be 
modified. 



POWER/VS REMOTE OPERATOR COMMAND LANGUAGE (ROCL) (...Continued) 



Queue Management commands (continued) 



Operation 


Operands 


Comments 


r*.. DELETE 
[* .. D 


pqueue, iobnameT, jobnumberl" 

queue, ALL 
< queue, class 

queue, *abc 
LMSG[,n] J 


queue : LST, PUN or RDR. 
iobname : Can be two to 

eight alphameric 
characters, 
jobnumber : The jobnumber is 
from one to five 
digits long. The 
DISPLAY command 
can be used to 
obtain the job- 
number. 
*abc: All job entries with the 
same first n characters 
are to be deleted, 
"abc" represents any 
combination of up to 
seven alphameric 
characters. 
MSG,n: "n" is the message 
number. If n is 
omitted, all 
ALLUSERS-type 
messages that were 
entered from this 
remote-id are 
deleted. 


r* .. release! 

V..R ] 


pqueue, }obname [, jobnumber]"] 
1 queue [,ALL] I 
queue, class [ 
^queue, *abc J 


queue : LST, RUN or RDR 
jobname : Can be two to eight 
alphameric 
characters, 
jobnumber : The jobnumber is 
one to five digits 
long. 
*abc : All job entries with the 
some first n characters 
are to be released, 
"obc" represents any 
combination of up to 
seven alphameric 
characters. 
ALL: All jobs in H-dispo- 
sition will be 
released. 



I 



POWEiy^VS REMOTE OPERATOR COMMAND LANGUAGE (ROCL) (...Continued) 
Miscellaneous commands 



Operation 


Operands 


Comments 


J* . . brdcstI 

1* . . B J 


remid, 'text' 


remid : Remote users can be 
identified by numbers 
from 1 to 200, A 
specification of 
indicates the central 
location, and a 
specification of 
ALLUSERS indicates 
all users. 

'text': The message can 

consist of from 1 to 40 
characters enclosed 
in single quotation 
marks. A single 
quotation mark within 
the message must be 
written as two quotation 
marks . 
(49 for SNA users) 


f' . . SETUP] 

1 * . . u r 


LST [,n] 


n : one or two digits that 

specify the number of pages 
to be printed. 



POWER/VS JOB ENTRY CONTROL LANGUAGE (JECL) 

The following table shows the JECL stataments and their functions : 



JECL Statement 


Function 


* S$ CTL 


Specifies a default input class 


* $$ JOB 


Indicates the beginning of a POWER/VS job and provides 




handling information 


*$$EOJ 


indicates the end of a POWER/VS job 


* $$ RDR 


Inserts a diskette file into the input stream 


* SS LST/ * S$ PRT 


Provides handling information for printed output 


* $$ PUN 


Provides handling information for punched output 


*$$SLI 


Inserts data from a sub library into the job stream 


*$$/* 


Used in a source statement library book to indicate the 




end of a DOS/VS job step ( used for the SLI statement 




only) 


*$s/& 


Used in a source statement library book to indicate the 




end of a DOS/VS job (used for the SLI statement only) 


* $$ DATA 


Inserts data into a book retrieved from a source 




statement library. 



I 



Each JECL statement consists of the following fields. 

1. Identification field. Contains the characters * $S (asterisk-blank-dollar- 

dollar) in columns 1 through 4. 



Operatic 



eld. Specifies the JECL operation. It can directly follow the 
1 the 



second dollar sign or be separated from the second dollar sign by one or 
more blanks. At least one blank must be placed between the operation field 
and the operand field. 

Operand field. Contains one or more keyword or positional parameters, 
separated by commas. Keyword and positional parameters cannot be mixed 
within one statement. 



Comments field. Con contain any information c 
user. 



sidered helpful by the 



Sequence field. Contains up to eight characters of optional information 
used for control statement identification. If present, the sequence field is 
positionally dependent and must be coded starting in column 73. 



POWER/VS JOB ENTRY CONTROL LANGUAGE (JECL) (...Continued) 



Operatioi 



Operand 



Gloss : Can be specified as an 
alphameric character 
from A-Z or 0-4. 



keyword forn 



,DISP 



jobname 

[disposition! 
,PRI = priority] 
[, CLASS = clasri 
LUSER = user-information"! 



positional form 



*$$ JOB 



jobname 

'f^ . 1 

I 31sposition J 

,[^prIorityJ 
,f clas^ 



jobname : A JECL jobname 
specification can 
be from 1 to 8 
alphameric 
characters, 
beginning with an 
alphabetic 
character. 

dispostion : D, H, K or L. 

priority : It is specified as a 
single digit from 
to 9. Nine is the 
highest priority. 

class : It can be specified as 

an alphameric character 
from A-Z or 0-4. 

user-information : 

Up to 16 bytes of user informatiot 

can be specified, within quotes. 



*$$ EOJ 



(no operand) 



indicates the end of a POWER/VS 



keyword form : 



' n RDR 



DEV = phys. unit number 



[-^ 



[ 



-^] 



r,FID= file-id] 

/NOD = . -. .. I „ 

number of diskettes] 

.vsc=y°l 






positional form : 



Physical unit-number 
,[ -file-id-] 

r -L. . 1 

' number of diskettes 



Physical -unit number : 
Parameter is used for Data-mode 
processing. 

Omitted for SYS IN -processing. 
Identifies the physical unit 
number of the diskette either 
in the form X-cuu- or cuu. 
FEED: Optional feed and 

eject of diskette 

at EOF. 
File id : 

Specific file name as appears 
in the HDRl label on the 
diskette. 

Can be one to eight alphameric 
characters between quotes. 
Number of diskettes : 
One to three digits can be 
specified. 
VSC : Volume sequence 

numbers must start with 

1. 
S : same as for VSC. 
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I 



OperatFon 



Operand 



keyword form : 



■''H 



A 



|_ |HTspositi( 

|3,REMOTE=remidj] 

,FNO: 



[ 



■orms-number| 



[,JSEP-sep] 



[.' 



Q,RBM= (norbm 1, norbm 2j] 

QlTAB = linetab] 

[,RBS=norbsJ 

I , UCS=(phasename f, option! ) 

r , FCB=phasename I 

[,LST=listaddr] 



positional form 



E,TADDR=tapeaddr] 



CMPACT=name/no^ 



•A^i\ 



TTaJ 



"^Tspositior 
A forms-number 

Inumber-of-copies [ 

(tapeaddr) 
, I norbm 1 
,1 linetob I 



disposition : D,H,K,L,N or T. 
remid : Can be a number from 
to 200. (0 is central 
installation.) 
forms -number : Can be one to 
four alphameric 
characters long, 
sep : Can be to 9. 
number-of-copies : Can be one 
or two 
digits long 
tapeaddr ; Can be 

cuu (Note) 

X'cuu' 
cuu,X'ss' 
X'cuu', X'ss' 
cuu,ss 
X'cuu', ss 
norbm 1 : This parameter is one 

to six digits long, 
norbm 2 : The number is one to 

six digits long, 
linetob : This parameter is 26 
digits long ; each 
subparameter is two 
digits. The format of 
linetob is : 
d0,dl,d2, ... dl2 

norbs : This parameter con be 
one to six digits long. 
A zero means that no 
segmentation will take 
place, 
phosename : The format of the 
parameter is 
(phosename, option), 
where "option" 
con be specified 
asF, C, CF, orFC. 
listoddr : The address can be 
either in the form 
SYSxxx, where xxx 
is LST or any valid 
programmer logical un 
unit ; or in the form 
cuu (or X'cuu'). 
name: specifies the name of 
the compaction table. 



Note : The only acceptable form for positional (cuu). 
1-25 
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Operation Operand 



keyword form : 



.k 



j_ jHTsposi 

[TrEMOTE = remid] 

j_ I torms -number 

QjSEP=sep] 

[cOPY=t , , . I 
mumber-or -copies I 

[],TADDR=(tapeaddr)] 

rRBM=(norbm l,norbm 2) 

QpUN=punadd7] 

r,RBS = norbs] 
f,CMPACT=name|nq) 
positional form : 



* U PUN 




disposition : D,H,I,K,L, N 

orT. 
class : Can be specified as any 

alphabetic character, 
remid : Can be a number from 
to 200. Numbers 1 to 
200 are specific remote 
users. If remid is 0, 
punch output is directed 
to the central installation, 
forms-number : One to four 
alphameric 
characters long . 
sep : Number of job separator 

cards (0 to 9), 
number-of-copies : One or two 
digits long, 
tapeaddr : Format : 

cuu (Note) 

X'cuu' 
cuu,X'ss' 
X'cuu', X'ss' 
cuu,ss 
X'cuu', ss. 
norbm 1 : One to six digits long, 
norbm 2 : One to six digits long, 
punaddr : The address can be 
either in the form 
SYSxxx where xxx is 
PCH or any valid 
programmer logical 
unit ; or in the form 
cuu ( or X'cuu'). 
norbs : Can be one to sixdigits 
long. A zero means that 
no segmentation will 
take place, 
name: specifies the name of 
the compaction table. 



*$$ SLI 



At execution time, the *$$ SLI 
(source library inclusion) statement 
causes the private and system 
source libraries to be searched 
for a book, which, when found, 
is inserted into the job stream. 



Note : The only acceptable form for positional (cui 
1-26 
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Operation 


Operand 


Comments 


*$$/* 


(no operand) 


indicates end of job step 


*$$/& 


(no operand) 


indicates end of job. 


* $$ DATA 


name 


name : can be from one to eight 
alphameric characters, 
the first character must be 
alphabetic. 



I 



POWER/VS CONTROL BLOCKS 



CONTROL ADDRESS TABLE (CAT) 



Included by definition macro IPWS$DPA for the permanent area. 

This table consists of a set of tables, addresses and constants in the permanent 
area of the POWEIV'VS partition, used to link the component routines of the 
POWER/VS subsystem during execution. 



Bytes 


Description/function of field 


Dec 


Hex 






Control address table 


00-15 
16-19 
20-23 
24-27 
28-31 
32-35 
36-39 
40-43 
44-47 


00-OF 
10-13 
14-17 
18-lB 
1C-1F 
20-23 
24-27 
28-2B 
2C-2F 


Storage descriptor (CAT) 

POWER/VS master ECB 

Start address POWEIV'VS partition 

Start address fixoble area 

Start address pageable area 

End address POWEI^VS partition + 1 

Start address LTA 

End address LTA +1 

Address of POWER/ VSP IB 






Relocation constant 


48-51 


30-33 


Relocation constant used by initiator to calculate 
the relocation factor for addresses in the 
following tables. (To enable POWEI^VS to be 
loaded in any partition.) Value = X'170'. 






External interface addresses 


52-55 
56-59 
60-63 
64-67 
68-71 
72-75 


34-37 
38-3B 
3C-3F 
40-43 
44-47 
48-4B 


Attention interface 
Page fault appendage 
Hot reader routine 
RJE CE appendage 
SVC appendage 
SVC 90/91 appendage 






Spool management cross-partition XECB information 


76-79 
80-80 
81-83 

84-87 
88-88 
89-91 


4C-4F 
50-50 
51-53 

54-57 
58-58 
59-5B 


Internal reader cross-partition XECB 

Internal reader XECB 
Internal RDR user's PIK/TIK 
XECBTAB ADDR of ICR XECB 

Spool/command manager cross-partition XECB 

Spool/command MGR XECB 
Spool/command MGR user's PIK/TIK 
XECBTAB ADDR of SPM XECB 

selecting the internal RDR task and/or the spool/ 
command manager LST task 



POWERAS CONTROL BLOCKS (CONTINUED) 



CONTROL ADDRESS TABLE (CAT) (...Continued) 



Bytes 


Description/function of field 


Dec 


Hex 


92-95 
96-99 
100-100 
101-103 


5C-5F 
60-63 
64-64 
65-67 


ADDR POWER'S internal reader XECB 
ADDR POWER'S spool/command MGR XBCB 
WAITM list delimiter 
Reserved 






Resource control block addresses. These addresses 
are collectively referenced by label CAFR. 


104-107 
108-111 
112-115 
116-119 
120-123 
124-127 
128-131 


68-6B 
6C-6F 
70-73 
74-77 
78-7B 
7C-7F 
80-83 


Disk management block. 
Account control block 
Storage control block 
Message control block (local) 
Message control block (remote) 
SNA control block address 
General purpose work area 






Module control block address table 

The addresses in this table are used by the disk 
services and are established when the POWERA'S 
disk files are opened at system start-up time. 


132-135 
136-139 
140-143 
144-147 
148-151 
152-155 
156-159 
160-163 
164-167 


84-87 
88-8B 
8C-8F 
90-93 
94-97 
98-9B 
9C-9F 
A0-A3 
A4-A7 


Accounting module 
MCB queue file 
MCB data file module 1 
MCB data file module 2 
MCB data file module 3 
MCB data file module 4 
MCB data file module 5 
MCB private SSL 
MCB system SSL 






Task state values and addresses of state processing 
routines . 

These constants are used by the task management 
macro instructions to set values within the task 
selection fields of the task control blocks 
(except TMCW). 


168-171 
172-175 
176-179 
180-183 


A8-AB 
AC-AF 
B0-B3 
B4-B7 


The task is inactive, task not selected 

Branch to TMIO 

Page fault in process, task not selected 

Branch to TMIO 

Wait for operator, task not selected 

Branch to TMIO 

Wait on locked resource, test lockword 

Branch to TM30 



I 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 



CONTROL ADDRESS TABLE (CAT) (Continued) 



Bytes 


Description/function of field 


Dec 


Hex 


184-187 
188-191 
192-195 
196-199 
200-203 
204-207 
208-211 
212-215 


B8-BB 
BC-BF 
C0-C3 
C4-C7 
C8-CB 
CC-CF 
D0-D3 
D4-D7 


Wait on LTA/PTA, test control blocks 

Branch to TM55 

Wait on multiple posting, test control blocks 

Branch to TM50 

Wait on class table posting, test control blocks 

Branch to TM50 

Wait on single posting, test control blocks 

Branch to TM80 

Wait on space posting,' test control blocks 

Branch to TM80 

Immediate dispatch, dispatch the task 

Branch to TM90 

Wait state. Used for WCB only. 

Wait routine. Branch to TM20. 

The task is running, no selection address 






Permanent TCB addresses 


216-219 


D8-DB 


Wait control block 
command processor TCB 
Initialization/termination TCB 
Line manager TCB 
Spool manager TCB address 


220-223 
224-227 
228-231 
232-235 


DC-DF 
E0-E3 
E4-E7 
E8-EB 






Task control address table 


236-239 

240-243 
244-247 

248-251 
252-255 
256-259 
260-263 


OEC-OEF 

0F0-0F3 
0F4-0F7 

0F8-0FB 
OFC-OFF 
100-103 
104-107 


Task identifying prefix (L) and the address of the 

TCB of the line manager (or of the wait control 

block if the line manager is not present) 

Task identify prefix and address of most recently 

attached spool management TCB 

Task identifying prefix (O) and the address of the i 

TCB of the most recently attached auxiliary 

command processor (or of the permanent command 

processor if no auxiliary command processor 

presently exists). 

Task identifying prefix (X) and the address of the 

TCB of the most recently attached remote (RJE) 

reader/writer. 

Task identifying prefix (W) and the address of the 

TCB of the most recently attached local writer 

task. 

Task identifying prefix (E) and the address of the 

TCB of the most recently attached execution 

processor task. 

Task identifying prefix (R) and the address of the 

TCB of the most recently attached reader task. 


264-267 


108-lOB 


X'FFOOOOOO' (list delimiter) 



powerM control blocks (.. .continued 



CONTROL ADDRESS TABLE (CAT) ( . . . Continued) 



Bytes 


Description/function of field 


Dec 


Hex 






Module load addresses (listed as loaded in the 

pageable area). 

The first module is referenced by label CAFM. 

The number of modules is referenced by label CANM. 

The number of SNA modules is referenced by label 

CANS. 






Command processor module 


268-271 


lOC-lOF 


Command processor 






Reader task modules 


272-275 
276-279 
280-283 
284-287 


110-113 
114-117 
118-llB 
IIC-IIF 


Physical reader 

Put data record function 

Logical reader 

Scan and check parameter function 






Writer task modules 


288-291 
292-295 
296-299 
300-303 


120-123 
124-127 
128-12B 
12C-12F 


Physical list 

Get data record function 
Logical writer 
Physical punch 






Execution processor modules 


304-307 
308-311 
312-315 
316-319 
320-323 


130-133 
134-137 
138-13B 
13C-13F 
140-143 


Execution reader 

Get data record function (copy 2) 

Execution writer 

Put data record function (copy 2) 

JECL analysis 






Queue management modules 


324-327 
328-331 
332-335 
336-339 
340-343 


144-147 
148-14B 
14C-14F 
150-153 
154-157 


Reserve queue function 
Add to queue function 
Get next from queue function 
Delete from queue function 
Free queue function 






Miscellaneous modules 


344-347 
348-351 
352-355 


158-15B 
15C-15F 
160-163 


LUB/PUB update function 
Print queue status report 
Invoke command processor function 



I 



POWER/VS CONTROL BLOCKS (...CONTINUED) 
CONTROL ADDRESS TABLE (CAT) ( . . . Continued) 



Bytes 


Description/function of field 


Dec 


Hex 


356-359 
360-363 
364-367 
368-371 
372-375 
376-379 


164-167 
168-168 
16C-16F 
170-173 
174-177 
178-17B 


Open tape routine 
Task terminator 
3540 Physical reader 
3540 Open routine 
Message handler 
Spool manager 






The following modules are optional 






Remote job entry BSC module 


380-383 


17C-17F 


Remote job entry 






Reader exit module 


384-387 


180-183 


User reader exit routine 






Accounting modules 


388-391 
392-395 
396-399 


184-187 
188-18B 
18C-18F 


Put account function 
Get account function 
Save account function 






Source library Include module 


400-403 


190-193 


Get SSL function 






Remote Job entry SNA modules 


404-407 
408-411 
412-415 
416-419 
420-423 
424-427 
428-431 
432-435 
436-439 
440-447 


194-197 
198-19B 
19C-19F 
1A0-1A3 
1A4-1A7 
1A8-1AB 
lAC-lAF 
1B0-1B3 
1B4-1B7 
1B8-1BF 


SNA manager 

SNA logoff processor 

SNA message processor 

SNA message definition 

SNA inbound processor 

SNA outbound processor 

SNA VTAM Exit 

SNA LOGON processor 1-IPW$$LH 

SNA LOGON processor 2-IPW$$LN 

Reserved 






Service routine branch table. 

The branch instructions are used to transfer control 
from service routine macro Instructions to the 
appropriate service code. 


448-451 
452-455 


1C0-1C3 
1C4-1C7 


Attach task 
Detach task 



t>OWERAS CONTROL BLOCKS (.. .CONTINUED) 



CONTROL ADDRESS TABLE (CAT) ( . . . Continued) 



Bytes 


Description/function of field 


Dec 


Hex 


456-459 
460-463 
464-467 
468-471 
472-475 
476-479 
480-463 
484-487 
488-491 
492-495 
496-499 
500-503 
504-507 
508-511 
512-515 


ICB-ICB 
ICC-ICF 
1D0-1D3 
1D4-1D7 
1D8-1DB 
IDC-IDF 
1E0-1E3 
1 E4-1 E7 
1E8-1D8 
lEC-lEF 
1F0-1F3 
1F4-1F7 
1F8-1FB 
IFC-IFF 
200-203 


Task selection 
Initial task entry 
Reserve resource 
Release resource 
Reserve work space 
Release work space 
Message service (local) 
Message service (remote) 
Set write command code 
Disk sen/ice 
Set read command code 
Disk service 
Tope service 
Timer service 
Validation service 






Block length table 

The table is used by the IPWSRSW macro instruction 
to identify the size of work space required to 
accomodate certain control blocks. 


516-519 
520-523 


204-207 
208-20B 


Data buffer - set by INIT (amount of storage required 

to accomodate the data block) 

Data block - set by INIT (size of record written to disk) 






Miscellaneous non-relocatable constants 


524-527 
528-531 


20C-20F 
210-213 


Line control block address 
BSC, RJE lockword 






Statistical information 


532-533 
534-535 
536-539 
540-543 
544-547 
548-551 
552-555 
556-559 
. 560-563 
564-567 
568-571 
572-575 


214-215 
216-217 
218-21B 
21C-21F 
220-223 
224-227 
228-22B 
22C-22F 
230-233 
234-237 
23B-23B 
23C-23F 


Highest BSC remote ID 
Number of BSC lines 
Total number of queue records 
Number of free queue records 
Maximum number of queue records used 
Total number of tracks data file 
Number of times waiting for storage 
Total number of pages allocated 
Current number of pages allocated 
Maximum number of pages allocated 
Current number of tasks 
Maximum number of tasks 



POWERAS control blocks (. . .CONTINUED) 
CONTROL ADDRESS TABLE (CAT) (. . . Continued ) 



Bytes 


Description/function of field 


Dec 


Hex 


576-579 
580-583 
584-587 
588-591 
592-595 


240-243 
244-247 
248-24B 
24C-24F 
250-253 


constants 

F'l' 

F'4' 

F'8' 

F'lO' 

F'24' 


Translation tables 


596-851 
852-1107 


254-353 
354-453 


This table is used to scan sequences of blank 
characters for the first non-blank character 
and also as a source of blank characters for 
various program purposes. 
This table is used to scan sequences of non- 
blank characters for the first blank 
character and also as a source of zero 
characters for various program purposes. 



POWER/VS CONTROL BLOCKS (. . . CONTINUED) 



WAIT CONTROL BLOCK (WCB) 



Bytes 


Description/function of field 


. Dec 


Hex 


00-15 

16-19 
20-23 

24-27 
28-31 


00-OF 

10-13 
14-17 

18-lB 
IC-IF 


Storage descriptor (WCB) 

Reserved 

Address of TCB belonging to task with highest 

priority in TSL 

Page fault request word - always zero 

Task selection field 

ByteO : X'E6' 

Byte 1-3 : Address of routine that tests if a 

POWER/VS event is posted in main 
ECB, if no event, it places the 
POWER/VS partition in wait state 
by issuing an SVC 7 to DOS/VS 
supervisor. 



I 



How to Locate : 



Displacement X'D8-DB' of the CAT contains a pointer 
to the WCB. 



POWER/ VS CONTROL BLOCKS (. . .CONTINUED) 
STORAGE CONTROL BLOCK (SCB) 
Definition macro : IPWSDSC 



Bytes 




Description/ function of field 






Dec 


Hex 




00-15 


00-OF 


Storage descriptor (SCB) 


16-19 


10-13 


Last permanent page 


20-23 


14-17 


First fixed page 


24-27 


18-lB 


Event control block 


28-31 


IC-IF 


Lockword 


32-35 


20-23 


Task register 14 




36-39 


24-27 


Task register 15 




40-43 


28-2B 


Task register 




44-47 


2C-2F 


Task register 1 


® 


48-51 


30-33 


Task register 2 


52-55 


34-37 


Task register 3 




56-59 


38-3B 


Task register 4 




60-63 


3C-3F 


Task register 5 




64-127 


40-7F 


Storage assignment table (ij 


128-135 


80-87 


Constant to initialize the first BCW 

(see Figure 5.21) in a new fixed page in the 

fixable area. 


136-143 


88-8F 


Constant to initialize the lost BCW in a new 
fixed page in the fixable area (see Figure 5.21) 






Page fi^free work area (D 


144-147 


90-93 


Page virtual address ^ 


148-151 


94-97 


Page length (-1) @ 


152-155 


98-9B 


End-of-list indicator (X'FFOOOOOO') 


156-159 


9C-9F 


Reserved 



y) Since the storage management routines are used to provide register save areas 
for task use, the storage control block must contain a register save area for use 
by the storage management routines. 

(2) The storage assignment table is like a map of the fixable area within the 

POWER/VS address space in which each page control byte represents a single 
page of address space. Each byte within the table takes one of fouf values. 

X'OO' Page free (and not last page) 

X'40' Page free (and last page) 

X'80' Page in use (but not last page) 

X'CO' Page in use (and last page) 



POWER/ VS CONTROL BLOCKS (...CONTINUED) 
STORAGE CONTROL BLOCK (SCB) (. .Continued) 



The storage assignment table is defined with all pages free and is 
properly initialized by the POVvtiVVS start-up routines to reflect the 
amount of real storage available to the POWER/ VS partition at that 
time. 

(3) Three fullwords used as a work are by the page-fix and page-free 

routines. The first word is used to contain the address of the first byte 
of the page to be fixed or freed; the second word contains binary 2047 
(page size minus one) ; and the third word contains X'FF' in its high-order 
byte to act as a list terminator. 



How to Locate : Displacement X'70-73' of CAT contains a pointer to the SCB. 



POWER/VS CONTROL BLOCKS (. . . CONTINUED) 



MESSAGE CONTROL BLOCK (MMB) 



Definition macro : IPW$DMM 



Bytes 








Description/function of field 






Dec 


Hex 




00-15 


00-OF 


Storage descriptor (MMB) 


16-23 


10-17 


Work Area 


24-27 


18-lB 


Reserved 


28-31 


IC-IF 


Lockword 






Register save area 


32-35 


20-23 


Saved register 14 


36-39 


24-27 


Saved register 15 


40-43 


28-2 B 


Saved register 


AA-A7 


2C-2F 


Saved register 1 


48-51 


30-33 


Saved register 2 


52-55 


34-37 


Saved register 3 


56-59 


38-3B 


Saved register 4 


60-63 


3C-3F 


Saved register 5 


64-67 


40-43 


Saved register 6 


68-71 


44-47 


Saved register 7 


72-75 


48-4B 


Saved register 8 


76-79 


4C-4F 


Saved register 9 






CCB 


80-81 


50-51 


Residual count 


82-83 


52-53 


Communication bytes 


84-85 


54-55 


Status bytes 


86-87 


56-57 


LUB identifier 


88 


58 


Flags 


89-91 


59-5B 


Channel program address 


92-95 


5C-5F 


DOSAS internal use 






Channel program 


96-103 


60-67 


Write CCW 


104-111 


68-6F 


Read CCW 


112-183 


70-B7 


Message output area 


184-255 


B8-FF 


Reply input area 


256-263 


100-107 


Reserved 



How to locate : Displacement X'74-77' of the CAT contains a pointer to 
the MMB. 



POWER/VS CONTROL BLOCKS (...CONTINUED) 



DISK MANAGEMENT BLOCK (DMB) 



Definition macro : IPW$DQC 



I 



The disk management block area is used to control access to the POWER/VS 
queue file, it is located in the permanent area of the POWEIV'VS partition. 

The disk management block Is divided into the following areas : 

o Resource control fields 

o File control fields 

o Record control fields 

o Master record area 

o Auxiliary account record area 

o Auxiliary queue record area 

o Master class table area . 

Detailed Description of Fields : 



Bytes 


Description/function of field 


Dec 


Hex 






Resource control fields 

They are used to manage the resources contained 
within the DMB 


00-15 
16-23 
24-27 
28-31 


00 -OF 
10-17 
18-lB 
IC-IF 


Storage descriptor (DMB) 

Reserved 

Event control block 

Lockword 






File control fields 

They contain parameters relating to queue file, 
data file, and, if used, private and system SSL 


32-35 
36-39 
40-87 
88-95 

96-99 
100-103 
104-135 
136-167 

168-171 
172-175 
176-223 


20-23 
24-27 
28-57 
58-5F 

50-63 
64-67 
68-87 
88-A7 

A8-AB 
AC-AF 
BO-DF 


Number of records/track queue file (J) 
Number of tracks/cylinder queue file (?) 
Queue file sector table 
Reserved 

Number of records/track data file Q 
Number of tracks/cylinder data file @ 
Track group control table 
Data file sector table 

Number of records/track SSL (?) 
Number of tracks/cylinder SSL @ 
SSL sector table 



POWEiyvS CONTROL BLOCKS (. . .CONTINUED) 
DISK AMNAGEAAENT BLOCK (DMB) (Continued) 



Bytes 


Description/function of field 


Dec 


Hex 






Record control fields 

They contain information used to read and write 
records to and from the master record area and 
auxiliary queue record area. 


224-231 
232-235. 
236-239 
240-247 
248-251 
252-255 


E0-E7 
E8-E3 
EC-EF 
F0-F7 
F8-FB 
FC-FF 


Master record seek address (MBBCCHHR) 

Real master area address 

Virtual master area address 

Queue record seek address (MBBCCHHR) 

Real auxiliary queue record area address 

Virtual queue record area address 






McJster record area 

The master record is written as the" first physical 
record within the, queue file extent. During 
POWEIV^VS execution a copy of the master record 
is maintained in this area. Whenever this copy is 
updated a replacement master record is at once 
written to the queue file so that, in the event of a 
failure of the system, warm start information can be 
recovered from the direct access device in question. 


256-263 

264-267 

268-271 
272-275 

276-279 


100-107 

108-1 OB 

lOC-lOF 
110-113 

114-117 


Date 

These eight bytes contain the date of POWER/ VS 
execution in the format chosen at system generation 
(dd/mm/yy or mm/dd/yy). 

POWEIV'VS start time 

These four bytes contain the start time of 

POWER/VS execution in packed decimal format. 

Reserved 

Data block size 

This fullword contains a fixed-point binary value 

representing the date block size of the data 

blocks within the data file. This is the length 

of the physical records written to the data file. 

Track group size 

This fullword contains a fixed-point binary value 

representing the number of tracks within each track 

group within the data file. 



POWER/VS CONTROL BLOCKS (...CONTINUED) 



DISK MANAGEMENT BLOCK (DMB) (Continued) 



Bytes 


DescripHon/ function of field 


Dec 


Hex 


280-281 


118-119 


Version and modification level 

Two numeric characters representing the version and 

modification level of POWER/VS used. 






Programming Note : The follov/ing 6 switch bytes 
preserve the options established by the POWER/VS 
user at the time he generated his version. 


282 

283 

284 
285 

286 
287 


llA 
IIB 

lie 

llD 
HE 

IIF 


Source library switch 

This byte contains a single alphabetic character 
representing the source statement sub library to be 
associated, unless otherwise specified, with any 
JECL SLI statements encountered in the read queue. 

Job accounting switch 

This byte contains a single alphabetic character ; 
the character A indicates that POWER/VS job 
accounting Is required; a blank character Indicates 
that POWEI^VS accounting is not required. 

Reserved 

LOG option switch (set to character L if JLOG=YES 
and blank if JLOG=NO) 

Termination status. Contains character A for 
incomplete session or abnormal termination. 
Otherwise, it contains character N> meaning 
normal termination. 
Note : It will contain an A during the session. 

Reserved 






Programming Note : The following 14 bytes contain 
standard POWER/VS default values used when new 
queue records are created. 


288-295 
296-297 


120-127 
128-129 


Default job name 

These eight bytes contain the character string 

'AUTONAME' used as a default job name. 

Master job number 

This halfword contains a fixed-point binary value 
representing the next job number to be assigned by 
POWER/VS. It Is incremented by one each time it 
is used . 



I 



POWER/ VS CONTROL BLOCKS (. . .CONTINUED) 
DISK MANAGEAv\ENT BLOCK (DMB) (Continued) 



Bytes 


Description/function of field 


Dec 


Hex 


298 
299 

300 

301 
302-303 


12A 
12B 

12C 

12D 
12E-12F 


Master queue identifier 

This byte contains the alphabetic character M to 

show that this is the master record. 

Default class attribute 

This byte contains the alphabetic character A 
representing the doss attribute to be given by 
default to each RDR queue entry created within 
POWER/ VS. 

Default priority attribute 
This byte contains numeric character 3 which 
defines the priorityattribute to be given by 
default to each queue entry created by 
POWER/ VS. 

Default cancel code 

This byte contains the hexadecimal characters 

X'lO' representing normal end'bf job and task 

Reserved 






Programming Note : Next 16-byte field contains the 
master line table, consisting of system default 
values used to analyse space and skip operations 
during printer contfol carriage simulation. 


304-319 


130-13F 


Line table 






Programming Note : Next 16 bytes contain the 
master list values, which will be inserted by default 
in list queue records, unless overridden by a 
JECL statement. (Values are set by IPW$$I1 using 
those specified by user during POWER/VS 
generation (JSEP=, RBS=, STDLINE= )) 


320-335 
320 

321-322 

323 

324-327 

328-331 

332-335 


140-14F 
140 

141-142 

143 

144-147 

148-14B 

14C-14F 


Master list values 

Option byte 

X'Or - 3540 feed option 

X'02' - Mult. Chan. 12 option 

Reserved 

Number of separators 

Records before segmentation 

Records before message 

Records before message 






Programming Note : Next 16 bytes contain the 
master punch values, which will be inserted by default 
in punch queue records, unless overridden by a 
JECL statement. (Values set by IPW$Sll using those 
specified by user during POWER/VS generation. 
(JSEP-, RBS=, STDCARD=)) 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
DISK MANAGEMENT BLOCK (DMB) (Continued) 



Bytes 


Description/function of field 


Dec 


Hex 


336-338 

339 

340-343 

344-347 

348-351 


150-152 

153 

154-157 

158-15B 

15C-15F 


Reserved 

Number of separators 
Records before seqmentation 
Records before message 
Records before next message 






Programming Note : Next 10 bytes contain account 
file values. 


352-359 
360-361 
362-375 


160-167 
168-169 
16A-177 


Account file seek address (MBBCCHHR) 

Contains the direct access storage seek address of the 

last record in the POWER/VS account file. 

Account file record maximum size 

Binary value representing the length of the longest 

record so far written to the account file. 

Reserved 






Programming Note : Next 32 bytes contain free 
queue pointers. 


376-383 
384-407 


178-17F 
180-197 


First record in free queue (MBBCCHHR) 
Reserved 






Auxiliary account record area 

This area actually overlaps the auxiliary queue 
record area, because the account record consists 
of the first part of the queue record which is built 
in that area. All account records except execution 
account are transferred from here to the account 
file as standard variable length records. 


408-415 


198-19F 


Block and record length 

This record control field is used for sequential 
access method. 






Auxiliary queue record area (152 bytes) 
This area is required as a work space for an additional 
queue record. For example, for updating class chain 
addresses during the add to queue function. The first 
part (96 bytes) of the Q record contains body fields 
(information pertinent to this particular queue entry 
and the user job which created it). 



POWER/ VS CONTROL BLOCKS (...CONTINUED) 



DISK MANAGEMENT BLOCK (DMB) (Continued) 



Bytes 


Description/function of field 


Dec 


Hex 


416-423 


1A0-1A7 


Date in format specified at SYS GEN 
(mrri/dd/yy or dd/mm/yy) 




424-427 


1A8-1AB 


Operation start time, in packed decimal 
(OHHMMSSF ; F = sign) 




428-431 


lAC-lAF 


Operation end time (OHHMMSSF ; F = sign) 




432-447 


IBO-IBF 


16 bytes user information 




448-455 


1C0-1C7 


Job name 

Job name associated with this particular POWER/ VS 

or DOS/VS job. If no Job name is provided by the 

user the default value ALTTONAME is set into this 

field. 




456-457 


1C8-1C9 


Job number 

Contains a binary job number assigned to the job 
upon its entry into the system and thereafter 
available for further identification of jobs with a 
common job name. 




458 


ICA 


Queue record identifier 

R = read queue record 
L = list queue record 
P = punch queue record 
F = free queue record 
D = dummy queue record. 




459 


ICB 


POWEIVVS cancel codes 
Cancel Code Condition 








X'lO' Normalendof POWER/ VS job or task 

X'20' PCANCEL has been issued 

X'30' PSTOP has been issued 

X'40' PFLUSH has been issued 

X'50' PDELETE has been issued 

X '60 ' PF LUS H has been issued v ia 

RDREXIT 
X'70' Canceled due to I/O error 


® 


460 


ICC 


Line identifier/device type 




461-463 


ICD-ICF 


Channel and unit (line address) 





POWER/VS CONTROL BLOCKS (...CONTINUED) 



DISK MANAGEMENT BLOCK (DMB) (Continued) 



Bytes 


Description/function of field 


Dec 


Hex 


464 


IDO 


From-terminal identifier 


465 


IDl 


To-terminal identifier 


466 


1D2 


Class (default = A) 


467 


1D3 


Priority (default = 3) 

This single byte contains the priority value 
(numeric to 9), assigned by the user to this 
job operation. 


468-471 


1D4-1D7 


Record count 

Binary counter that represents the number of 
input or output data records associated with the 
read, list, or punch operation (data transfer and 
control operations). 


472-473 


1D8-1D9 


Number of tracks for output storage 
Binary counter recording the number of tracks 
within the data file used to contain data input or 
output for this particular Job operation. 


474 


IDA 


Job suffix number 

Binary job suffix number assigned to each successive 
operation (read, list, or puch) performed on behalf 
of the job. It may be used to identify output sets 
produced by jobs handling segmented output. 


475 


IDB 


Number of copies 

This single byte contains a binary value indicating the 
number of copies of printed or punched output that 
are to be produced when the output is processed by the 
writer tasks. It has no use within input-related 
queue records. 


476-479 


IDC-IDF 


Forms identifier 

Alphameric forms or card identifier of any special 
stationery or card stock to be used when creating the 
physical output from the job. A blank value indicates 
that no special requirement exists. The field has no use 
within input -related queue records. 


480-483 


1E0-1E3 


Number of additional records. 



I 



1-45 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
DISK MANAGEMENT BLOCK (DMB) (Continued) 



Bytes 


Description/ function of field 


Dec 


Hex 


484-485 


1E4-1E5 


Number of pages (number of skips to channel 1) 


486-487 


1E6-1E7 


Number of extra pages 


488-491 


1E8-1EB 


Line/card counter (data transfers only) 


492-495 


lEC-lEF 


Restart page counter (used when PRESTART command 
given) 


496 


IFO- 


Copies remaining (used when PRESTART command 
given) 


497 


IFl 


Not used 


498 


1F2 


Disposition (default = D) 


499 


1F3 


Number of separators 

Binary value indicating the number of printed output 
separators to be produced. It has no use within input- 
related queue records. 


500-503 


1F4-1F7 


Number of records before segmentation (count driven 
segmentation) 


504-507 


1F8-1FB 


Records before message 

Binary value representing the maximum number of list 
or punch data records that is to be tolerated by this 
job. When the record count exceeds the maximum value 
a warning message is output to the system operator. 


508-511 


IFC-IFF 


Records before next message 

Additional number of list or punch data records that is 
to be tolerated by the job each time the record count 
exceeds the maximum value specified in the preceding 
field and the system operator elects to continue 
execution of the |ob. 


512-513 
514-515 
516-519 


200-201 
202-203 
204-207 


3540 Physical device addres (packed) 
Saved job number for accounting 
Compaction table name 






The second portion (56 bytes) of the queue record 
contain control fields (information relating to the status 
of the queue record and to its position within the 
POWER/VS queues). 


520 


208 


Execution switch 
x = job in execution 
b = job not in execution 


521 


209 


First in set switch 



POWER/VS CONTROL BLOCKS (...CONTINUED) 



DISK MANAGEMENT BLOCK (DAAB) (Continued) 



Bytes 


Description/function of field 


Dec 


Hex 


522 


20A 


Segmentation type 

c = count driven segmentation 
p = program driven segmentation 
d = data driven segmentation 
b = no segmentation 


523-535 


20B-217 


Reserved 


536-543 


218-21F 


Next record in set (MBBCCHHR) 

M = index in module control block address 

table in CAT. 


544-551 


220-227 


Pointer to previous queue record 

(MBBCCHHR) 

M = index in module control block address table in 

CAT. The meaning of this pointer depends on the 

value of the contents in field QCFS. (displ. X'20r) 


552-559 


228-22F 


Pointer to next queue sat of class chain (MBBCCHHR) 
M = index in module control block address table 
in CAT. The meaning of this pointer depends on the 
value of the contents in field QCFS. (displ. X'20r) 


560-567 


230-237 


Seek address of first data block (MBBCCHHR) 
M = index in module control block address table in 
CAT. Seek address of the first read, list, or punch 
data block associated with the input or output 
described by this queue record. 


568-575 


238-23F 


Reserved 






Master class table area 






Defines the status of the POWER/VS queues. 


576-723 
724-873 
874-1019 


240-2D3 
2D4-367 
368-3FB 


Reader class area (37 entries, that is, 1 dummy entry 

and 36 entries 0-9 and A-Z) 

List class area (37 entries, that is 11 dummy entries 

and 26 entries A-Z) 

Punch class area (37 entries, that is, 11 dummy entries 

and 26 entries A-Z) 


1020-1024 


3FC-400 


Resen/ed 



POWEiyvS CONTROL BLOCKS (...CONTINUED) 



DISK AAANAGEMENT BLOCK (DMB) (Continued) 



Bytes 


DescrFption/f unction of field 


Dec 


Hec 






Each entry is defined as a class list entry (DSECT=) 
and consists of the following two 2-byte fields : 
1st field : Relative record number of first queue 

record in queue set in this class chain. 
2nd field: Relative record number of last queue 

record in queue set in this class chain. 

The high-order bit in the last field indicates whether 
there is a queue entry in this class that can be 
dispatched. 



(Y) This fullword contains a fixed-point binary value, representing the number of 
records per track characterising the DASD on which the file is located. 

(2) This fullword contains a fixed-point binary value, representing the number of 
tracks per cylinder characterising the DASD on which the file is located. 

(3) This code indicates that the corresponding queue entry was not affected by an 
abnormal POWEiyVS termination. The DOS/VS jobs associated with the queue 
entry, however, could have been canceled via DOS/VS. 

(^ The PSTOP cancel code will not be stored in an account record if the EOJ 
option was specified with the PSTOP command. 



How to Locate : Displ. X'68-6B ' of CAT contains pointer to the DMB. 



POWER/VS CONTROL BLOCKS (...CONTINUED) 



TASK CONTROL BLOCK (TCB) 



Definition macro : IPWSDTC 



The TCB is divided into the following main areas : 

o Task management fields 

o Task register save area (TRSA) 

o File control words and general task work area 

o Linkage register save area (LRSA) 



I 



)@(3) 



(T) The LRSA may be the first part of a double linkage register save area 

(DLRSA). 

(2) When the TCB belongs to a command processor task, the file control 
words, general task work area, and linkage register save area are replaced 
by a command processor control block. 

(3) When the TCB belongs to an RJE line manager task, the file control words, 
general task work area, and linkage register save area are replaced by 
information for the line manager. 



POWER/VS CONTROL BLOCKS ( . . 
TCB - TASK MANAGEMENT FIELDS 



■ CONTINUED) 



Bytes rn TCB 


Description/function of Task management fields 


Dec 


Hex 






The first 16 bytes contain the storage descriptor 


00-03 
04-07 


00-03 
04-07 


Storage descriptor block ID (TCB) 
Task ID 

X'D6' (C) TCB belongs to a command processor 
task. Remaining 3 bytes are '!6C?' 

X'C9'(I) TCB belongs to an initiator. 
Remaining 3 bytes are 'J^IT' 

X'ES" (T) TCB belongs to a terminator task. 
Remaining 3 bytes are ')^TT'. 

X'D9' (R) TCB belongs to a local reader . 

X'E6' (W) TCB belongs to a local writer. 

X'C5'{E) TCB belongs to an execution 
processor task , 

In this case the next byte contains 
X'40', and the remaining bytes in 
the field indicate the partition that 
requested the task. For example, 
X'C6F1 ' = foreground partition. 

X'F r - 'F9' TCB belongs to an RJE task. 

In this case the three remaining bytes 
will Indicate the type of task. For 
example, X'D9C4D9' - RDR. 

X'D3' (L) TCB belongs to a line manager task. 
Remaining 3 bytes are 'RLM'. 

X'D7' (P) TCB belongs to a status task. 
Remaining 3 bytes are ')^PS'. 

X'40' Oi) TCB belongs to an account task. 
Remaining 3 bytes are 'ACT'. 

X'Dl' (J) TCB belongs to a spool management 
task, the three remaining bytes 
indicating the type of task (RDR, LST 
or SPM) 


08-11 


08-0 B 


Physical device ID 

Physical unit address. If byte of the task ID field = 
X'FT - X'F9' (1-9), then it contains the RJE line 
number. 

'PSP' (for RDR task) and 'GSP' (for LST task) are used 
respectively for PUTSPOOL and GETSPOOl/CTLSPOOL 
processing. 


12-15 


OC-OF 


Tenninal ID 

Byte^= ID in binary format. 

Byte 1-3 = ID in character decimal format. 

Identifies the terminal ID requiring the task. When 

binary zeros (0000), then task started as result of 

command invoked by the central operator. 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
TCB - TASK MANAGEMENT FIELDS (Continued) 



I 



Bytes in TCB 



Description/function of Task management fields 



The following two fields form part of the task selection 
list (TSL). 



Address of task control block belonging to previous 
task in task selection list. 

Address of task control block belonging to the next task 
in task selection list. If the present is the last task 
control block in the chain, the address is that of the 
wait control block. 

Page fault request word. Contains page fault request 
information resulting from a page fault interrupt. 
Contents of GPR 13, passed from DOS/VS supervisor 
and saved for page management in the event of a 
page fault occurring during execution of the task. 
The field is set to binary zeros when no page fault 
request condition is present; hence, it will contain 
binary zeros-during the time that the task is in control 
of the central processor. 



Task selection field. 

Byte (the first byte in the field ) 



Task State Values 



: Task State Value 



At any time, each task within the POWER/VS must be in 
one or another of a set of task states. The state of each 
task is defined by the single alphameric character in 
byte 28 of the associated task control block, and this in 
turn determines what action the task management 
routines must take when the task is examined for dispatch 

Task states are normally set by the task itself whenever 
one of the task management macros is issued. The task 
management routines and the command processing task 
are privileged, however, in that they may modify the 
task state of tasks other than themselves. 

Note : Task states can also be set by the page fault 
appendage routine. 



POWER/ VS CONTROL BLOCKS (...CONTINUED) 



TCB - TASK MANAGEMENT FIELDS ( Continued) 



Bytes in TCB 



Dec Hex 



Description/function of Task management fields 



32-48 



2C-2F 



Task states 


Hex 


Char 


Task condition 




C9 


1 


Task is inactive 


Not 


D7 


P 


Page fault in process 


dispatchable 


D6 


O 


Waiting for operator 
response 




D3 


L 


Waiting for locked 
resource 




C6 


F 


Waiting for the LTA 
orPTA 


Conditionally 


D4 


M 


Wait on multiple CCB 


dispatchable 






or ECB posting Q 




D8 


Q 


As for M state, except 
event may never occur 




C3 


C 


Wait on single CCB or 
ECB posting Q) 




E2 


S 


As for C state, except 
event may never occur 


Immediately 


C4 


D 


Dispatch task 


dispatchable 






immediately 


Running 


D9 


R 


Task is running 


® or for an RJE task 


, waitir 


ig-for a single ECB 


posting. 






(2) or for an RJE task 


, waitir 


g for a multiple ECB 


posting. 







Bytes 1-3 = Address of the routine in the nucleus 
that tests for the condition indicated 
by the task state. 

Task class list ( plus a 1-byte field of X'FF') 
Up to four different classes can be specified 
simultaneously for any task, except RDR. For each 
class identifying character an entry is made in this 
field. The first byte of each entry contains the class, 
and the remaining three bytes contain an address of 
an ECB in the master class table area (in DMB). 

Spool Management Switch 

CI' - Logical writer already initialized 
CO'- Open logical writer 
C'C - Close logical writer 

Address of users cross partition XECB 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
I TCB - TASK MANAGEMENT FIELDS (Continued) 



Bytes In TCB 



Description/function of Task management fields 



Term 


ination type 


Hex 


Char 




40 


0>) 


Normal - continue execution 


E4 


(U) 


Unrecoverable I/O error 


E7 


(X) 


Task cancel condition 


C3 


(C) 


PCANCEL command issued 


C6 


(F) 


PFLUSH command issued 


C5 


(E) 


Stop at end of Job 


E2 


(S) 


Stop immediately 


C8 


(H) 


PFLUSH with hold issued 


D9 


(R) 


Stop immediately and restart 



Job boundary switch 

FF = Start of fob 

00 = Job boundary 

80 = No [ob started yet 

Function track indicator 

This indicator is used by the task terminator phase (TR) 
to determine the appropriate action in case of an I/O 
error on the queue file or the data file. The 
following entries are possible : 

On input : 



X'D5' 


N 


- Get next from queue 


X'C9' 


1 


- Open for input 


X'C7' 


G 


- Get in process 


X'C4' 


D 


- Delete in process 


X'C3' 


C 


- Free pending 


X'C6' 


F 


- Free in process 


X'C5' 


E 


- End of queue action, awaiting 
accounting action 


X'D3' 


L 


- Put account record in process 


X'OO* 





- No entry active 


X'40' 


h 


- No entry active 



POWER/VS CONTROL BLOCKS (...CONTINUED) 



TCB - TASK MANAGEAAENT FIELDS ( Continued) 



Bytes in TCB 


Description/function of Task management fields 


Dec 


Hex 


52 
53-55 


34 
35-37 


Function track indicator (continued) 

On output : 

X'D9' R - Reserve queue in process 

X'D6' O - Open for output 

X'D7' P - Put in process 

X'Or A- Add to queue 

X'05' E - End of queue action, awaiting 

accounting action 
X'D3' L - Put account record in process 
X'OO' - No entry active 
or 
X'40' ]p - No entry active 

Double buffering indicator 
Double buffering ECB 






Each POWER/VS task that needs to perform input 
or output operations addressed to the system console 
must specify the operotion required in the form of a 
message request word or a reply request word. 
These control fields ore used to pass the necessary 
parameters for the operation of the message service 
routines. 


56-59 
60-63 


38-3B 
3C-3F 


Message request word . 

Byte : Hold flag and R5 flag. 
Byte 1-3 : Message address. 

The message address field contains the virtual address 
of the message control byte, that is, the byte that 
immediately precedes the test of the message to be 
output. 

Reply request word 

Byte 0: Binary 0. 

Byte 1-3 : Reply address. 

The reply address field contains the virtual address of 
the reply control byte, that is, the byte that 
immediately precedes the input area into which the 
reply is to be read. 

if no reply is to be mode to the message, this 
field must contain binary zeros. 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
TCB - TASK REGISTER SAVE AREA (TRSA) 



Bytes in TCB 



Description/ function of Fields in TRSA 



Register 12 - asynchronous address register 
('task PSW) 

Register 12 contains the address of the first instruction 
to be executed when the task is despatched. The first 
byte contains the condition code and the program mask 
bits in the form in which they are loaded by BAL 
instructions. (This is also true when the information is 
provided by the page fault appendage routines.) 

Register 13 - save area register 

Register 13 may contain the address of either the first 
(or only) or second linkage register save area depending 
on the hierarchy level of the caller. 

Register 14 - linkage register 

Register 14 is used to contain the linkage address, that 
is, the address to which return is to be made when an 
exit linkage is next performed. When not required for 
this purpose the register is available for general use. 

Register 15 - entry point register 

Register 15 Is used to address the entry point of the 
routine to be entered when an entry linkage is 
performed. This address Is normally that of the storage 
descriptor which precedes the routine to be executed. 
The register may be conveniently used as the base 
register for the function to be executed. When not 
required for this purpose the register is available for 
general use. 

Register 1 - parameter and work register 

Register 1 may address a control block or control block 
list on which the task is at present waiting. For a task 
In C or S state it will point to a conventional DOS/VS 
CCB or a POWER/VS ECB. For a task in M or Q state, 
it will point to an A3 or CCB list. 



POVVtiy^VS CONTROL BLOCKS (. . .CONTINUED) 
TCB - TASK REGISTER SAVE AREA (TRSA) (Continued) 



Bytes in TCB 


Description/function of Fields in TRSA 


Dec 


Hex 


88-91 


58-5B 


Register 2 - linkage and work register 

Register 2 is used by service routines to retain the 
return address of the requesting task. It also has 
machine usage when a translate and test instruction 
is executed. When not required for these purposes 
the register is available for general task use. 


92-95 


5B-5F 


Register 3 - resource address register 

Register 3 may contain the address of a resource 
control block on which the task is at present waiting 
(task in L state). When not required for this purpose 
the register is available for general task use. 


96-99 


60-63 


Register 4 - work register 


100-103 


64-67 


Register 5 - work register 

If the task owns queue space, this register will address 
the queue record. 


104-107 


68-6B 


Work register (may address the DMB). 


108-111 


6C-6F 


Work register 

In an execution processor task this register addresses 
the user CCB. 


112-115 


70-73 


Work register 

In an execution processor task this register addresses 
current channel command. In a physical routine, it 
points toPWS. 


116-119 


74-77 


Base register for highest level of code used by task. 


120-123 


78-7B 


Restart information 

This field contains an action type code in byte and 
a value in bytes 1-3, as follows : 

Byte : 

X'04' restart at specified record (card or page) * 
X'08' skip forward specified number of records * 
X'OC skip back specified number of records * 

(* set by PRESTART command) 



1-56 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
TCB - TASK REGISTER SAVE AREA (TRSA) (Continued) 



Bytes in TCB 


Description/ function of Fields in TRSA 


Dec 


Hex 






Restart information (continued) 






Byte (continued): 






X'lO' print specified number of pages (set by 

PSETUP command) 
X'14' restart a specified record (card or page) 

(set by PSTOP with RESTART option) 






Bytes 1-3 : 






The number of records (cards or pages) to be acted 
upon. 


124 


7C 


Device type code 


125 


7D 


Account track indicator 

This indicator is used by the task terminator phase 
(TR) to determine the appropriate action in cose of 
an I/O error on the account file. 

It can contain the following : 

X'D6' O - Open for reading account file 

X'Cl' A- Caller active 

X'C7' G - Get in process 

X'C3' C - Close in process 

X'D2' K - Keep account file in process 

X'C5' E - Erase account file in process 

X'OO' - No entry active 

or 

X'40' )i - No entry active 


126-127 


7E-7F 


Packed device address 


128-131 


8i2^-83 


Save area for service routines 


132-135 
136-139 


84-87 
88-8B 


Save area for service routines 
Reserved 


140-143 


8C-8F 


Address of spool parameter list. 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 



TCB - GENERAL TASK WORK AREA, LINKAGE REGISTER SAVE AREA, AND FILE 
CONTROL WORDS-. 



When the TCB belongs to a command processor task, this part of the TCB is replaced by 
command processor control fields, when it belongs to a BSC line manager task, it is 
replaced by BSC line manager control fields, and when it belongs to an SNA manager task, 
it is replaced by SNA manager control fields. 



Bytes in TCB 


Description/t^unction of Fields 


Dec 


Hex 






General Task Work Area 


144-159 
160-167 
168-171 
172 


90-9F 
A0-A7 
A8-AB 
AC 


This area may be broken into fields in whatever way is 
required by a task (for example, logical reader and writer 
work areas). It can also contain the 3540 communication 
byte (LWER) : 

X'Or = card reader with a 3540 attached 
X'02' = reading from 3540 
X'04' = 3540 data file processing 

Used by logical routines 

Spool management fob name 

Address of error exit return in IPW$$SM 

Switch byte 






Linkage Register Save Area (LRSA) 


176-179 • 

180-183 

184-187 

188-191 

192-195 

196-199 

200-203 

204-207 

208-211 

212-215 

216-219 

220-223 

224-227 

228-231 


B0-B3 
B4-B7 
B8-BB 
BC-BF 
C0-C3 
C4-C7 
C8-CB 
CC-CF 
D0-D3 
D4-D7 
D8-DB 
DC-DF 
E0-E3 
E4-E7 


Task control block address 

Previous save area address points to second or double LRSA 

Saved register 14 

Saved register 15 

Saved register 

Saved register 1 

Saved register 2 

Saved register 3 

Saved register 4 

Saved register 5 

Saved register 6 

Saved register 7 

Saved register 8 

Saved register 9 






Data File Control Words 


232-239 


E8-ff 


Data file seek address (MBBCCHHR) M = index into the 
module load address table. 

For tape spooling, this 8 byte field is defined as follows : 
Bytes : 

Tape flag (X'80') 

1 Reserved 
2-3 Length field 

4-7 Address of tope control block 



POWER/VS CONTROL BLOCKS ( . . .CONTINUED) 



TCB - GENERAL TASK WORK AREA, LINKAGE REGISTER SAVE AREA, AND FILE 
CONTROL WORDS, (continued) ' ' 



Bytes 


n TCB 


Description/function of fields 


Dec 


Hex 


240-243 
244-247 


F0-F3 
F4-F7 


Real data area address (see Note 1) 
Virtual data area address 






Blocking Control Words 


248-251 
252-255 


F8-FB 
FC-FF 


Residual block count 
Previous record address 






Record Control Word (formed from CCW) 


256 

257-259 

260 


100 

101-103 

104 


Record command code 

Record address (virtual) 

General purpose byte (see Note 2) 

X'OO' = normal record 
X'02' = 3540 data record 
X'04' = end of dote 
X'08' = break record 
X'10' = end of block 
X'20' = end of 3540 data 


261 


105 


General purpose byte 


262-263 


106-107 


X'Ol • = TCB for read only operations 
X'08' = Device end occurred (reader) 
Record length 






I/O (disk or tape) Request Word for Queue File 


264-271 


108-lOF 


Queue file seek address (MBBCCHHR) M = X'04' 

For tape spooling this 8 byte field is defined as follows : 

Bytes : 

Tape flag 

1 Reserved 
2-3 Length field 

4-7 Address of tape control block 


272-275 
276-279 


110-113 
114-117 


Real queue space address (see Note 1) 
Virtual queue space address. 



How to locate : Chaining of TCB's via 'previous' and 'next' pointers, task selection list is 
/ delimited by the WCB. 

Note 1 : The high order byte of this field will contain the command code of the current or 

last executed operation. 
Note 2 : Bit 7 of this byte may be set to (to indicate no data transfer or cord motion), or 

to 1 (to indicate data transfer or card motion). 



1-59 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
COMMAND PROCESSOR CONTROL BLOCK (CPB) 



This block replaces part of a command processor TCB, when a command is 
entered via the console keyboard by the central operator, and of its associated 
temporary command processor TCB when linkage is made via the IPW$ICP macro. 

CPB replaces file control fields, general task work area, and LRSA of standard 
TCB. 

The contents of the CPB are described below : 



Bytes 




Description/ function of field 






Dec 


Hev 




00-15 


00-OF 


Storage descriptor (CPB) 


16 


10 


RJF-userid ( for local) 


17-23 


11-17 


Command Code 


24-95 


18-5F 


Operands (free format) 


96-103 


60-67 


Sequence number (RJE only) 


104-107 


68-68 


Address of caller ECB 


108-135 


6C-87 


Reserved 



How lo Locate : Displacements X'80' of the appropriate command processor TCB 
is the starting address of the CPB . 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
PHYS ICAL WORK SPACE (PWS) 



Definition macro : IPW$DPW. 



Bytes 


Description/function of field 


Dec 


Hex 


00-03 


00-03 


Virtual address of the first PDA 




04-07 


04-07 


Real address of the first PDA 




08-11 


08-OB 


Virtual address of the second PDA 




12-15 


OC-OF 


Real address of the second PDA 




16-19 


10-13 


Virtual address of the active PDA 




20-23 


14-17 


Real address of the active PDA 




24-25 


18-19 


Displacement of last CCW in string from beginn 
of PDA 


*ng 


26-27 


lA-lB 


Physical record length: to update the record 
pointer in the deblock routine 




28-31 
28 

29 
30-31 


IC-IF 
IC 

ID 
lE-lF 


Device type information 
1 byte = single/double buffering (contains 
number of buffers) 

1 byte= device type of unit record device 

2 bytes = LUB number 




32-35 


20-23 


Virtual address of end of PDA 




36-39 


24-27 


Real address of end of PDA 




40-43 


28-2C 


Real address of the first CCW 




44-55 


2D-37 


Reserved. 





POWEiyVS CONTROL BLOCKS (. ■ .CONTINUED) 
PHYSICAL WORK SPACE (PWS) 3540 EXTENTION 



Bytes 




Description/function of field 


Dec 


Hex 






3540 Extension 


56-59 


38-3B 


Real address of the physical work space. 
Device type indication. 


60 


3C 


Reserved. 


61 


3D 


Device type. 


62-63 


3E-3F 


Programmer logical unit. 
Diskette parameters from PSTART. 


64-71 


40-47 


File identification. 
PSTART parameters. 


72 


48 


Reserved. 


73 


49 


Number of diskettes to be read. 


74 


4A 


Sequence check required. 


75 


4B 


Verify requested. 


76-79 


4C-4F 


Displacement between real and virtual CCB addresses. 


80-83 


50-53 


Address of 3540 CCB or physical data area. 


84-87 


54-57 


Virtual address of first 3540 data buffer. 


88-91 


58-5B 


Real address of first 3540 data buffer. 


92-95 


5C-5F 


Virtual address of second data buffer. 


96-99 


60-63 


Real address of second data buffer. 


100-103 


64-67 


Real address of forced pre-SEEK CCW. 


104-107 


68-6B 


Seek address (OOCCHHRR). 


108-111 


6C-6F 


Overlap seek address (OOCCHHRR). 


112-115 


70-73 


Extent lower limit (OOCCHHRR). 


116-119 


74-77 


Next sector address (OOCCHHRR) 


120-121 


78-79 


Record length. 


122-123 


7A-7B 


Number of buffers allocated in second data buffer. 
Sequence Identification. 


124 


7C 


Multivolume identification. 


125 


7D 


Volume sequence number. 


126 


7E 


Open return code. 


127 


7F 


Number of opened diskettes. 


128-135 


80-87 


Double word for conversion purposes. 


136-151 


88-97 


Reserved. 



How to Locate: 

Reg. 8 in the TCBfor a task that uses a physical routine. 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
LOGICAL DATA RECORD AREA (LDA) 



The format of a data record is shown below : 
12 3 4 



RL RL GP CC 



I 



-ff- 



• Command code 
(for output U.R. device) 



- General purpose byte 
X'OO' = normal record 
X'02' = 3540 data record 
X'04' = end of data 
X'08' = break record 
XMO' =end of block 
X'20' = end of 3540 data 
(Note : bit 7 of this byte may be set to 
to indicate data transfer or card motion 
is to be performed) 

Record length 



How to Locate : Displ. X'88-8B' (I/O request words) of a TCB for R/Wor XPtask 
contains a pointer to the LDA. 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
MODULf CONTROL BLOCK (MCB) 
Deflnifion macro : IPWSDMC 



DescripMon of Contents 



Bytes 



Description/function of field 



16-23 
24-27 
28-31 



10-17 
18-lB 
IC-IF 



Storage descriptor MCB QFILEl cuu (SYSOOl) 
Storage descriptor MCB DFILE2 cuu (SYS002) 
Storage descriptor MCB DFILE3 cuu (SYS003) 
Storage descriptor MCB DFILE4 cuu (SYS004) 
Storage descriptor MCB DFILES cuu (SYS005) 
Storage descriptor MCB DFILE6 cuu (SYS006) 
Storage descriptor MCB LFILE7 cuu (SSL) 
Storage descriptor MCB LFILE8 cuu (PVTSSL) 
Module seek address (MBBCCHHR) 
Reserved 
Lockword 



Command control block 



32-33 
34-35 
36-37 
38-39 
40-43 
44-47 



20-21 
22-23 
24-25 
26-27 
28-2B 
2C-2F 



Residual count 

Communication bytes 

Device status 

EXCP real plus LUB index 

CCW address 

CCW address in CSW 



Extent informatior 



48-51 

52-55 

56 

57-59 

60-63 



30-33 

34-37 

38 

39-3B 

3C-3F 



Low limit (CCHH) 

High limit (CCHH) 

Sector value 

Reserved 

Sector table address 



Channel program 



64-71 

72-79 

80-87 

88-95 

92-95 

96-103 

104-111 



40-47 
48-4F 
50-57 
58-5F 
5C-5F 
60-67 
68-6F 



Seek CCW 

Set sector or TIC CCW 

Search CCW 

TIC CCW 

Virtual address of real buffer 

Read or write CCW 

Reserved 



112-179 



70- B3 



SLI Support 



112-115 
116-119 
120-179 



70-73 
74-77 
78-B3 



SSL-number of records/track 
SSL-number of tracks/cylinder 
Extention to sector table SSL 

Reserved 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 



MODULE CONTROL BLOCK (MCB) ( Continued) 



(T) Seek and search address required by the channel program. Whenever 

on input or output operation is to be performed it is updated from the 
seek address pointer in the I/O Request Word that controls the 
operation. 



Displ. 



X'88-8B' 
X'8C-8P 
X'90-93' 
X '94-97' 
X'98-9B' 
X'9C-9F' 
X'A0-A3' 
X'A4-A7' 



of CAT contains pol 



nter to MCB Q files 




' Dfile 1 




' Dfile 2 




■ Dfile 3 


' 


■ Dfile 4 




' Dfile 5 




private SSL 




system SSL 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
TAPE CONTROL BLOCK qBB) 
Definition macro : IPWSDTB 
Description of Contents 



Bytes 


Description/function of field 


Dec 


Hex 


00-15 
16-27 
28-31 


00-OF 
10-lB 
IC-IF 


Storage descriptor (TBB) 

Reserved 

Lockword 






Command control block 


32-33 
34-35 
36-37 
38-39 
40-43 
44-47 


20-21 
22-23 
24-25 
26-27 
28-2B 
2C-2F 


Residual count 
Communication bytes 
Channel and device status 
EXCP real plus LUB Index 
CCW address 
CCW address In CSW 


48-55 


30-37 


Write CCW 



How to Locate: Displ. X'EC-EF' and X'lOC-lOF' of TCB (when Initialised for 
tapespooling) contain pointers to TBB. 



PQWER/VS CONTROL BLOCKS (...CONTINUED) 
PAGE CONTROL BLOCK (PCB) 



Definition macro : IPW$DPC 



Bytes 


Description/function of field 


Dec 


Hex 


00-03 
04-07 

08-11 
12-15 

16-19 
20-23 


00-03 
04-07 

08-OB 
OC-OF 

10-13 
14-17 


Page real storage address 

Real storage address of the page described by this 

PCB. 

Previous page virtual address 

Virtual storage address of the previous page in the 
fixed page list. If the present page is the first page 
in the fixed page list the word Is set to binary zeros. 

This page virtual address 

This fullword contains the virtual storage address of 

the page described by this page control block. 

Page control byte address 

Contains the virtual storage address of the byte within 
the storage assignment block in the storage control 
block which corresponds to the present page. 

First buffer address 

This fullword contains the virtual storage address of the 

first storage buffer within the present page. 

Next page virtual address 

This fullword contains the virtual storage address of 
the next page in the fixed page list. If the present 
page is the last page in the fixed page list the word 
is set to binary zeros. 



How to locate :Each page in the fixoble area starts with this control block, which 
occupies the first 24 bytes of the page. 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
BUFFER CONTROL WORD (BCW) 



Bytes 


Descrlptlon/funcWon of the field 


Dec 


Hex 


00-01 
02-03 

04-07 


00-01 
02-03 

04-07 


Length of previous buffer 

This halfword contains the binary length of the 
immediately-preceding storage buffer. If the buffer 
is in use its length is stored in twos complement 
form. If the buffer is not in use its length is stored 
in normal form. If the present buffer is the first in the 
page the word is set to binary zeros. 

Length of next buffer 

This halfword contains the binary length of the 
present storage buffer, that is, the buffer which 
immediately follows this buffer control word in 
storage. If the buffer is in use its length is stored 
in twos complement form. If the buffer is not in use 
its length is stored in normal form. If the preceding 
buffer is the last in the page the word is set to 
binary zeros. 

Owner (TCB virtual address) of next buffer. This 
fullword contains the address of the TCB belonging 
to the task which issued the request for buffer space. 
If a TCB is contained in the buffer, the owner address 
is that of the task which built the TCB. 



How to locate : When a page is fixed in the fixable area, storage management 

assigns the first and last buffer control words. The first buffer control 
word is placed immediately after the page control block at the start 
of the page in real storage, and the last buffer control word is placed 
in the last two words of the page. 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
PARTITION CONTROL BLOCK (PDB) 

Definition macro : IPW$DPD 



Bytes 




Description/function of fields 


Dec 


Hec 


00-15 


00-OF 


Storage descriptor PART.CONTR. BLOCK 


16-17 


10-11 


Reserved 


18-19 


12-13 


Partition Identifier 


20-23 


14-17 


Number of entries 


24-27 


18-lB 


Partition comreg address 


28-31 


IC-IF 


PIB address 


32-35 


20-23 


First entry address 


36-39 


24-27 


Boundary Box entry pointer 


40-47 


28-2F 


Reserved 






Statistical Information 






This information is destined for the execution 






account record and there Is a pointer to the SLI 






work area 


48-51 


30-33 


Pointer to SLI work area 


52-55 


34-37 


Number of lines spooled 


56-59 


38-3B 


Number of cards spooled 


60-61 


3C-3D 


Number of pages spooled 


62 


3E 


Default output class 


63 


3F 


Multitasking Indicator 






3540 Spool device entry 


64-79 


40-4F 


Format same as for RDR device entry 






RDR device entry (maximum = 1) 


80-83 


50-53 


Address of entry in the DOS/VS PUB for a cord 
reader device 


84-87 


54-57 


Address of execution reader TCB 


88-91 


58-5B 


CCB address. The first byte of this field is the SVC 
code : 

X'OO' = SVC : I/O request by user program 
X'90' = SVC90 : accounting request by PA 
X'9r = SVC91 : accounting request by JCL 


92 


5C 


Device type code 


93 


5D 


Device class code 

Can be R = normal reader, or C = console 


94-95 


5E-5F 


Requestor ID 



POWEiyvS CONTROL BLOCKS (. . .CONTINUED) 
PARTITION CONTROL BLOCK (PDB) (Continued) 



Byfes 


Description/ furTction of fields 


Dec 


Hex 






LST device entry (maximum = 8) 


96-99 

100-103 
104-107 
108 
109 

110-111 


60-63 

64-67 
68-6B 
6C 
6D 

6E-6F 


Address of entry in the DOS/ VS PUB for a printer 

device 

Address of the execution list TCB 

CCB address 

Device type code 

For list device entry this can be L = device 

is being spooled, N = device is not being spooled. 

Requestor ID 


Depends on number of 
LST entries 


PUN device entry (maximum = 8) 
(same format as LST device entry) 






Address of entry in the DOS/VS PUB for a punch 

device 

Address of the execution punch TCB 

CCB address 

Device type code 

For punch device entry this can be P = device is 

being spooled, N = device is not being spooled. 

Requestor ID 



How to Locate : Displ. X'AO - A3' of the partition comreg and R6 in TRSA 
of a TCB. 



POWER/VS CONTROL BLOCKS (...CONTINUED) 
QUEUE RECORD AREA (QRA) 
Definition macro : IPW$DQR 



I 



Bytes 




Description/function of field 


Dec 


Hex 






Body Fields (first 96 bytes) 






The body of the queue record contains information 






pertinent to this particular queue entry and the 






user job which created it. 


00-07 


00-07 


Date 


08-11 


08-08 


Operation start time 


12-15 


OC-OF 


Operation end time 


16-31 


10-lF 


User information 


32-39 


20-27 


Job name 


40-41 


28-29 


Job number 


42 


2A 


Queue record identifier 


43 


2B 


POWER/VS cancel code 


44 


2C 


Line identifier or device type 


45-47 


2D-2F 


Channel and unit (line address) 


48 


30 


From terminal identifier 


49 


31 


To terminal identifier 


50 


32 


Class 


51 


33 


Priority 


52-55 


34-37 


Record count 


56-57 


38-39 


Number of tracks 


58 


3A 


Job suffix number 


59 


3B 


Number of copies 


60-63 


3C-3F 


Forms identifier 


64-67 


40-43 


Number of additional records 


68-69 


44-45 


Number of pages 


70-71 


46-47 


Number of extra pages 


72-75 


48-4B 


Line/card counter 


76-79 


4C-4F 


Restart page count 


80 


50 


Copies remaining 


81 


51 


Not used 


82 


52 


Disposition 


83 


53 


Number of separators 


84-87 


54-57 


Number of records before split 


88-91 


58-5B 


Maximum value of count 


92-95 


5C-5F 


Additional count value 


96-97 


60-61 


3540 Physical unit address in packed format 


98-99 


62-63 


Save [ob number for accounting 


100-103 


64-67 


Compaction table name 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
QUEUE RECORD AREA (QRA) (Continued) 



Bytes 


Description/function of field 


Dec 


Hex 






Control Fields (56 bytes) 

The control portion of the queue record contains 
information relating to the status of the queue record 
and to its position within the POWER/VS queues. 


104 

105 

106 

107-119 

120-127 

128-135 

136-143 

144-151 


68 

69 

6A 

6B-77 

78-7F 

80-87 

88-8F 

90-97 


Execution switch 
First in set switch 
Segmentation type 
Reserved 

Next record in set 
Previous set in queue 
Next set in queue 
First block of data 



How to locate : Displ. X'110-113' of a TCB (not being Comm. procor Line 
manager TCB). 



POWER/VS CONTROL BLOCKS (. . .CONTINUED ) 

SLI WORK SPACE (SLW) 
Definition macro : IPW$DSL 



I 



Bytes 


Description/function of field 


Dec 


Hex 


00-79 


00-49 


Logical record work area 


80-239 


50-E9 


SSL block work area 






Disk request word 


240-247 

248-251 
252-255 


F0-F7 

F8-FB 
FC-FF 


Seek address (MBBCCHHR) M= index in module 
control block address table in CAT. 
Real address read-in area 
Virtual address read-in area 


256-259 


100-103 


Register 8 save area 






SLI sublibrary and bookname 


260 
261-268 


104 
105-lOC 


Sub library name 
Bookname 


269 
270 


lOD 
lOE 


Read SSL switch 
Read RDR switch 


271-279 


lOF-117 


Filler for alignment 



Displ. X'30'-X'33' of PDB. 



POWEty^VS CONTROL BLOCKS (. . .CONTINUED) 



ACCOUNT CONTROL BLOCK (ACB) 



Definition macro : IPW$DAC 



Bytes 


Description/function of field 


Dec 


Hex 


00-15 


00-OF 


Storage descriptor (ACB) 


16-19 


10-13 


Event control block 

This ECB is posted when the account file 

emptied 


is 


20-23 


14-17 


Extent lower limit 


24-27 


18-lB 


Extent upper limit 


28-31 


IC-IF 


Lockword 






Command Control Block 


32-33 

34-35 

36-37 

38-39 

40 

41-43 

44 

45-47 


20-21 

22-23 

24-25 

26-27 

28 

29-2B 

2C 

2D-2F 


Residual count 
Communication bytes 
Device status 
Logical unit 
Reserved for LIOCS 
CCW real address 
Reserved for P IOCS 
CCW address in CSW 


48-54 
55 


30-36 
37 


Current seek address (BBCCHHR) 
Reserved 


56-63 


38-3F 


Count field 


64-67 


40-43 


Maximum account file capacity 


68-71 


44-47 


20% limit residual capacity 


72-75 


48-4B 


Current residual capacity 


76-79 


4C-4F 


Maximum track capacity 


80-83 


50-53 


Residual capacity on current track 


84-87 


54-57 


Number of tracks per cylinder 


88-89 


58-59 


Sector values 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 



ACCOUNT CONTROL BLOCK (ACB) (. . .CONTINUED) 



Bytes 


Description/function of field 


Dec 


Hex 


90-91 


5A-5B 


Tolerance 


92-93 


5C-5D 


Overhead 


94 


5E 


PUB device type code 


95 


5F 


DTFPH device type code 






Channel Program 


96-103 
104-111 
112-119 
120-127 
128-143 
144-151 


60-67 
68-6F 
70-77 
78-7F 
80-8F 
90-97 


Seek CCW 

Set sector or TIC * +8 CCW 

Search ID equal CCW 

TIC * -8 CCW 

WCKD CCWs (WCOUNT and WDATA) 

Read sector CCW or not used 


152-167 

168-171 
172-183 


98-A7 

A8-AB 
AC-B7 


Channel program modifiers RDATA and 
RCOUNT CCWs 

Virtual address account work space buffer 
Not used 



I 



How to Locate; 
) Displ. X'6C'- X'6F' of CAT. 



POWER/VS CONTROL BLOCKS (...CONTINUED) 



LINE CONTROL BLOCK (LCB) 



Definition macro : IPWSDLC 



Bytes 


Description/function of field 


Dec 


Hex 


00-07 
08-15 
16-19 

20-23 

24-39 

40-47 

48-49 

50 

51 

52 

53-55 

56 

57 

58-59 

60-61 

62-63 


00-07 
08-OF 
10-13 

14-17 

18-27 

28-2F 

30-31 

32 

33 

34 

35-37 

38 

39 

3A-3B 

3C-3D 

3E-3F 


LCB header (LCBbbcuu) 

System data in format specified at SYSGEN 

SIGNON time in format OHHMMSSF; 

F = sign in packed decimal 

SIGN OFF time in format OHHMMSSF; 

F = sign in packed decimal 

User information 

Line password 

Reserved 

Line account record identifier (T) 

SIGNOFF code 

Terminal error count. This count is only 

maintained for intervention required and for 

specific timeouts. When the count reaches 

10 a record is v/ritten to SYSREC (error 

recorder file). Then the count is reset to zero. 

When it reaches 10 again, the same sequence 

occurs. 

Line address (in alpha) 

Remote identifier (in binary) 

Remote identifier (for compatibility) 

Transmission count per session 

Timeout count per session 

Error count per session 


64-67 
68-71 

72-75 
76-79 

80-83 


40-43 
44-47 

48-4B 
4C-4F 

50-53 


Corresponding BCA address 

LCB chain pointer. A chain of LCBs is maintained 

and is continuously scanned by the line manager. 

Up to 25 LCBs can be chained, the last LCB in the 

chain has in this field. 

Work field 

Remote identifier. 

This 4-byte field consists of remote ID in binary 
in first byte and remote ID in alpha in bytes 2, 3 
and 4. 

List output classes. Each byte in this 4-byte field 
contains a hex displacement in the LST part of the 
MCTA in the DMB. The displacement contained in 
one of the bytes therefore corresponds to a class. 

Up to four classes may be specified, being 
delimited by X'FF' in a similar manner to that in the 
TCCT field in theTCB. 



POWER/VS CONTROL BLOCKS (. . . CONTINUED) 
LINE CONTROL BLOCK (LCB) ( . . CONTINUED) 



Bytes 



Description/function of field 



For example, the command * .. START LST, 
B,C,D would result in the displacements 18, 
IC, 20 being placed in this field. (Byte 3 
would be X'FF'). If no START LST command 
is entered the first byte of this field is FF. 

Punch output classes. Each byte in this 4-byte 
field is used in the same way as in field 
LCB LIST, displacements being in the PUN 
part of the MCTA. 

Timeout counter. This field counts the number 
of timeouts (1 every 3 seconds) as long as the 
terminal is idle (no data transfer). When 
information is transmitted on the line it is set 
to zero. The count is compared with the 
timeout limit specified in the PLINE macro. 

Timeout limit. The value in this field is 
specified by the TIMEOUT paramater in the 
PLINE macro. If the user specifies 1 (one minute) 
the value set in this field is binary 20. The 
maximum timeout that may be specified is 255 
minutes. If the idle time on the line as counted 
in the field LCBTMCNT exceeds the value of 
field LCBTMOUT the terminal is signed off by 
POWEiVVS. If TIMEOUT=NO is specified, this 
field is filled with binary zeros. 

Line features 

B'lXXX XXXX' ASCII code line 

B'XIXXXXXX' Transparent feature 

B'XXXXXXXr Switched line 

B'XXYY YYYX' OOYY YYYO is mode byte for 2701 

LCB flags 



X'80' 


Line stop 


X'40' 


Line start/restart 


X'20' 


An ETX has beeri received 


X'lO' 


No messages wanted 


X'08' 


Remote is signed on 


X'02' 


SIGN OFF card has been read 


X'Ol' 


signoff (processing finished) 


Output 


switches 



= list output is ready and dispatchable 
for any of the classes started 
= punch output is ready and distpatchable 
for any of the classes started 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
LINE CONTROL BLOCK (LCB) (...CONTINUED) 



Bytes 




Description/function of field 






Dec 


Hex 








On START LST, field LCBOUT is initiated with 






X'80'. 






On START PUN, field LCBOUT is initiated with 






X'08'. 


95 


5F 


Message subchain index. This byte contains the 
entry number in the message queue that contains 
the first message queued for this LCB. 


96-99 


60-63 


Reader TCB address. This field contains the reader 
TCB address as long as the reader is active. It is 
set to binary zero when an RDR TCB is detached. 
If an EOF is encountered in the middle of a |ob, 
TCB space is not released, and the field is not 
set to zero. After the user responds by placing 
more cards in the reader the reader TCB will be 
reactivated. 

To summarize : 

If the field is zero, a new TCB is created. If the 
field is nonzero, the original TCB is reactivated. 


100-103 


64-67 


List forms 


104-107 


68-68 


Punch forms 


108-109 


6C-6D 


Corresponding PUB address 


110-111 


6E-6F 


Message counter. This field contains the number of 
messages for the user of this LCB in the remote 
message queue. 

Since this remote message queue contains 255 
entries an overflow condition may occur. Should 
an overflow occur , the LCB with the highest 
value in this field is located, all messages for this 
user are removed from the message queue and 
replaced by message 1R20I. 


112-119 


70-77 


Not used . 


Remote Block 


120 


78 


Default punch routing 


121 


79 


Default list routing 


122-123 


7A-7B 


Terminal buffer size 

Size of this buffer depends on type of terminal. 



POWER/VS CONTROL BLOCKS (. ■ .CONTINUED) 
LINE CONTROL BLOCK (LCB) (. . .CONTINUED) 



Bytes 


Description/function of field 


Dec 


Hex 


124 


7C 


Terminal type plus line features 

X'80' Log every channel end [>1 

X'40' Transparency D>2 

X'20' ASCII code 

X'02' 3780 

X'01' 2780 or 3741 








X'OO' 2770 or 3780 with component select 1 


125 


7D 


Terminal features 

X'20' Hardware compress feature 
X'lO' Multiple-record feature 
X'08' Horizontal format control 
X'02' Variable length records 
X'Or Blocked records 




126 
127 


7E 
7F 


Remote printer width 
Reserved 





D>i. 



The byte is set X*80' if TRACE=YES has been specified in the REMOTE macro. 
It enables a wraparound I/O trace in the phase IPW$$TM. 



^2. Transparency enables user to transmit object decks over line. If no transparency 

is supported codes X'OO' through X'40' are converted to binary zeros for output 
to the terminal. 

Transparency on input (read) is determined by a switch on the terminal unit. 

For print output to the terminal, non-transparency if forced by POWER/VS. 

For punch output, transparency depends on whether it has been specified in the 
PLINE macro and the PRMT macro. If either one has not been specified for 
transparency, non-transparency is forced by POWER/VS. 

How to Locate: Displacement X'20C'-'20F' of the CAT 
points to the LCB. 



POWER/VS CONTROL BLOCKS (...CONTINUED) 
BUFFER CONTROL AREA (BCA) 



Defintion macro : IPW$DBC 



Bytes 


Description/function of field 


Dec 


Hex 






RJE CCB 

Initialized with a complete sense CCW to read 
sense information into the two sense bytes in the 
BCA. Byte 12 is initialized with bits 1 and 2 on 
indicating that channel-end appendages and 
private unit-check routines are being used. 


00-01 

02 

03 

04-05 

06-07 

08- n 

12 

13-15 

16-23 


00-01 

02 

03 

04-05 

06-07 

08-OB 

OC 

OD-OF 

10-17 


Residual count 
Communication byte 
Communication byte 
Status bytes from CSW 
Logical unit number 
First CCW address 

Communication byte 
Channel appendage address 
RJE sense CCW 




RJE CCW string, dynamically set up by MCCWINIT routine 


24-31 
32-39 
40-47 
48-55 
56-63 
64-71 


18-lF 
20-27 
28-2F 
30-37 
38-3F 
40-47 


These six CCW fields constitute various channel 
programs that depend on the operation required. 
For example, a READ program consists of 

• An enable CCW 

• A write response CCW 

• A read text CCW. 

A WRITE program has a different CCW string and 
a PREP program consisting of : 

• A disable CCW 

• A set mode CCW 

• An enable CCW 

• A write enquiry CCW 

• A read response CCW 






EBCDIC/ASCII Code Table 

This table is moved from virtual storage at OPEN 
time for RDR, LST, or PUN to reflect one of the 
following four conditions: 

EBCDIC code transparency 
EBCDIC code non-transparency 
ASCII code transparency 
ASCII code non -transparency 



POWER/VS CONTROL BLOCKS (.. .CONTINUED) 
BUFFER CONTROL AREA (BCA) (...CONTINUED) 



I 



Bytes 


Description/function of field 


Dec 


Hex 


72-73 
74-75 
76 
71 

7Q-79 

80 

81 

82 
83 

84 
85 

86 

87 

88 

89 

90 

91-92 

93-94 

95 


48-49 
4A-4B 
4C 
4D 

4E-4F 

50 

51 

52 
53 

54 
55 

56 

57 

58 

59 

5A 

5B-5C 

5D-5E 

5F 


Multi leaving sign-on sequence 

Start of text sequence 

End of text block sequence 

End of text block character 

This 1-byte field is the second byte of the 

previous 2-byte field. 

End of text sequence 

Even acknowledgement sequence 

Even acknowledgement character 

This 1-byte field is the second byte of the 

previous 2-byte field. 

Odd acknowledgement sequence 

Odd acknowledgement character 

This 1-byte field is the second byte of the 

previous 2-byte field 

Negative acknowledgement sequence 

Negative acknowledgement character 

This 1-byte field is the second byte of the 

previous 2-byte field. 

Acknowledgement conversation character 

CCW chaining character 

Enquiry character 

End of transmission character 

Wait before transmit 

DLE-EOT characters 

Saved write count 

Maximum retry count 






Other RJE Information 


96-99 
100 

101-102 
,104 

105-107 
108-111 

112-115 
116-119 

120-123 


60-63 
64 

63-67 
68 

69-6B 
6C-6F 

70-73 
74-77 

78-7B 


Restart address of channel program 

Last remote output command code 

Address of the last remote carriage control 

Current remote output record count. Incremented at 

each PUT during a WRITE operation. The count is 

compared with the value in the field TPBMXREC. 

If they match, the PDA is written out. 

Remote data pointer. Address of the record in the 

PDA currently being processed. 

Address of last data byte read. Address of the last 

byte read into the PDA (not necessarily the last byte 

in the PDA). 

Address of the corresponding LCB 

Address of the lost CCW executed plus 8 (stored 

by the RJE channel appendage routine on every 

I/O interrupt). 

Displacement between the real and virtual address 

of the BCA (used to construct real addresses for the 

channel program). 



POWERA/S control blocks (. . .CONTINUED) 
BUFFER CONTROL AREA (BCA) (...CONTINUED) 



Byfes 




Description/function of field 






Dec 


Hex 




124-127 


7C-7F 


Address of next CCB complefed. BCA chain pointer, 
set up by channel appendage routine, and 
processed by line manager. 


128-131 


80-83 


Address of a list TCP or punch TCB as long as an 
RJE LST or PUN task is active. Otherwise, the 
field is 0. (Has same function as field 
LCBTCBAD in the LCB. 


132-135 


84-87 


Real address of PDA. Address of current TP buffer. 
Updated whenever a new buffer is obtained. 


136-139 


88-8B 


Virtual address of PDA. Address of current TP 
buffer. Updated whenever a new buffer is obtained. 


140-143 


8C-8F 


Address of last TCB, as long as a form change is 
needed. Otherwise, the field is 0. 


144 


90 


Remote mode byte (SDA mode byte). Set at line 
initialization time to X'04' for 2701, and to 
X'OO' for 2703 TP control unit or ICA. 


145 


91 


Remote next acknowledgement . For write response 
CCW 


146-147 


92-93 


Remote response control block. Used for the write 
response to the terminal, and to read the response 
from the terminal 


148 


94 


First sense byte (see TP manual) 


149 


95 


Second sense byte (always 0) 


150 


96 


Maximum output record count. Contains a value 
equal to the maximum record count for the output 
buffer at the terminal. Its value depends on the 
terminal type. 


151 


97 


BCA flags 

X'Or end of transmission 

X'02' end of forms 

X'04' second entry to put routine. 



How to Locate: Displacement X*40 - 43' of the LCB points to the BCA. 



POWER/VS CONTROL BLOCKS (...CONTINUED) 
OPEN 3540 DISKETTE WORK SPACE 



Bytes 




Description/function of field 






Dec 


Hex 




00-15 


00-OF 


Storage descriptor ('OEWS V6M0 cuu") 






3540 command control block 


16-17 


10-11 


Residual count 


18-19 


12-13 


Communications bytes 


20-21 


14-15 


Device status 


22-23 


16-17 


Device type and logical unit 


24 


18 


J^eserved for LIOCS 


25-27 


19-lB 


First CCW 


28 


IC 


Reserved for PIOCS 


29-31 


ID-IF 


CCW address in CSW 


32-87 


20-57 


Temporary register save area for the interface 
between functions 


88-95 


58-5F 


Conversion work space 






3540 channel program 


96-103 


60-67 


Define operations or NOP 


104-111 


68-6F 


Seek 


112-119 


70-77 


Read label 


120-123 


78-7B 


Mode setting argument 


124-127 


7C-7F 


Seek argument (OOCCHHRR) 


128-207 


80-CF 


3540 input area and label test area 






Message buffers and work areas 


208 


DO 


Message length of first line 
First line of message output area 


209-215 


D1-D7 


Message identity 


216-263 


D8-107 


Message text of first line 


264 


108 


Message length of second line 
Second line of message output area 


265 


109 


Message identity 


266-319 


110-13F 


Message text of second line 


320 


140 


Not used 


321 


141 


Reply length 


322-327 


142-147 


Reply input area 


328-329 


148 


Cylinder number save area 






Physical reader information indicators. 






The following indicators are copied from the 






physical work space to prevent them from being 






destroyed should the open be unsuccessful. On a 






successful open, the indicators in the physical 






work space are overwritten by these updated 






indicators. On an unsuccessful open, only the 






open indicator 'PEOC will be updated with the 






stop code 'S'. 



I 



POWER//S CONTROL BLOCKS (...CONTINUED) 



OPEN 3540 DISKETTE WORK SPACE (...CONTINUED) 



Bytes 


Description/funcMon of field 


Dec 


Hex 


330-331 

332 
333 
334 
335 


14A-14B 

14C 
14D 
14E 
14F 


Record length (copy of PERI) 

Sequence ID (copy of PES 1) 

Multivolume identification (copy of PEMI) 

Volume sequence number (copy of PESN) 

Number of opened diskettes (copy of PEOD) 

Number of diskettes to be read (copy of PEND) 


336-343 


150-157 


Not used 



POWERAS control blocks (.. .CONTINUED) 



BSC LINE MANAGER TCB FIELDS 



Bytes 


Description/function of field 


Dec 


Hex 


00-27 
28-31 
32-87 
88-103 


00-1 B 
IC-IF 
20-57 
58-67 


Reserved 

SYSREC header 

BSC line manager save area 

Reserved 



P0WERA(S control blocks (. . .CONTINUED) 
SNA CONTROL BLOCK (SNCB) 



Bytes 








Description/function of field 


Dec 


Hex 


00-15 


00-OF 


Storage descriptor (SNCB) 


16 


10 


SNA termination type 


17 


11 


Termination type set by SNA exit routines 


18 


12 


Flag byte: 

X'80' - SNA stop requested (SNSS) 
X'40' - Kill SNA requested (SNKS) 
X'20' -Subtask detach requested (SNST) 
X'lO' - Subtask quiesce requested (SNRQ) 


19 


13 


Maximum number of logical units 


20-23 


14-17 


Address of first active SNA unit control block (SUCB) 


24-27 


18-lB 


Address of SNA unit control block space 


28-31 


IC-IF 


SNA control block iockword 


32-35 


20-23 


Address of SNA remote control block (RMCB) 


36-39 


24-27 


Lockword for general purpose work space (RMGP) 
in SNA remote control block 


40-43 


28-2B 


Address of SNA manager TCB 




2C-2F 


Subtask ECB 




30-33 


SNA manager work ECB 




30-31 


Unused 




32 


Post byte 




33 


Unused 




34-3B 


Reserved 




3C-7B 


VTAM ACB + 4 words for expansion 




7C-7F 


Pointer to logon space pool for SUCB/LUCB, 
WACB and LRCBs 




80-83 


Compaction table pool address 




84-87 


Address first logon request control block (LRCB) 




88-8B 


Address logon SUCB 




8C-8F 


Address of compaction table 




90-93 


LRCB chain - lockword 1 




94-97 


LRCB chain - lockword 2 




98-9B 


Compaction table lockword 




9C 


!BW$$LH process byte 

X 80 - Request for IPW$$LH 

X 40 - IPW$$LH is active 




9D-B7 


Unused 



How to Locate: 



Displacement X*7C - 7F' of CAT. 



POWERM control blocks (...CONTINUED) 



SNA REMOTE CONTROL BLOCK (RMCB) 



Bytes 


Description/function of field 


Dec 


Hex 


00-15 

16-19 

20-22 

23 

24-31 


CO-OP 

10-13 

14-16 

17 

18-lF 


Storage descriptor (RMCB) 

Reserved 

Reserved 

Length of ACB password 

ACB password 


32-1055 


20-41F 


General purpose work space 

This area is serially accessible by SNA tasks that 
cannot obtain vurtual storage via the DOSA^S GETVIS 
macro. Access is regulated by a lockword (SNRL)' 
located in the SNA control block (SNCB), 


1056-1311 
1312-1439 


420-51F 
520-59F 


Translate table to convert EBCDIC characters to ASCII 
Translate table to convert ASCII characters to EBCDIC 






SNA Manager save area 


1440-1567 
1440-1447 
1448-1567 
1568-1639 
1640-1711 


5A0-61F 
5A0-5A7 
5A8-61F 
620-667 
668-6AF 


Subtask save area 

C 'IPWSSSN' -Subtask name 

Register save area 

VTAM RECEIVE Any save area 

VTAM SETLOGON save area 


1712 
1713 
1714 
1715 


6 BO 
6B1 
6B2 
6B3 


No. of SNA remote entries 

First SNA remote ID 

Last SNA remote ID 

Total no. of IK blocks in GETVIS pool for 

compaction tables including COCB. 


1716- 


6B4- 


Remote entries (The number of remote entries, which are 
16 bytes long, depends on the number of SNA remote 
units specified in the PRMT macro at POWER/VS 
generation.) 






The following is a layout of a remote entry. 






Punch routing remote ID (1 byte) 

List routing remote ID (1 byte) 

Remote reference information 

Buffer size (1 byte) 

Terminal type (1 byte) 

Terminal features (1 byte) 

Console specified (1 byte) 

Reserved (7 bits) 

Reserved (1 byte) 

Length of password (1 byte) 

Password (8 bytes) 

Compaction table name (4 bytes) 

Number of LU names (1 byte) 

Address of first LU name in list (3 bytes) 

Session limit (2 bytes) 

Reserved (6 bytes) 



Displacement X 20 - X 23 of SNCB. 
1 - 87 



POWERAS CONTROL BLOCKS (. . . CONTINUED) 
SNA LOGICAL UNIT CONTROL BLOCK (LUCB) 



Bytes 




Description/function of field 


Dec 


Hex 


00-15 


00-OF 


Storage descriptor 


16-19 


10-13 


Previous address LUCB (pointer) 


20-23 


14-17 


Address of next LUCB (Pointer) 


24-27 


18-lB 


Address of SUCB 


28 


IC 


Select indicator 
C S -select 


29 


ID 


Termination type (C S - immediate) 


30 


IE 


Termination type, set by exits 


31 


IF 


Free session indicator 
X'80' - session in use 


32-35 


20-23 


Reader 1 work space address 


36-39 


24-27 


Reader 2 work space address 


40-43 


28-2B 


VTAM CID 






Session Accounting Information 


44-51 


2C-33 


Date = c MM/DDAY 


52-55 


34-37 


Signon time = X'OHHMMSSF' 


56-59 


38-3B 


Signoff time = X'OHHMMSSF' 


60-75 


3C-4B 


User information 


76-83 


4C-53 


LU name 


84-85 


54-55 


Reserved 


86 


56 


c S - identifier for account record. 


87 


57 


Session termination code 

X'Ol' - Normal (SIGNOFF or LOGOFF) 

X'02'- Abnormal 


88-91 


58-5 B 


Remote identifier 


88 


58 


Binary format 


89-91 


59-5B 


Character format 






Restart Information 


92-95 


5C-5F 


Restart 


92 


5C 


Restart function index 


93-95 


5D-5F 


Restart page count 






List and Punch Characteristics 


96-99 


60-63 


Pointer to device in SUCB 


100 


64 


List output support 

X'OO' - List output support 

X'80' - ASCII 

X'40' - Compression 

X'20' - Transparency 

X'lO' - Spanning 

X'80' - Inter-record separator 

X'Ol' - Compaction 



POWER/VS CONTROL BLOCKS (. . .CONTINUED) 
SNA LOGICAL UNIT CONTROL BLOCK (LUCB) 



Bytes 




Description/function of field 




Dec 


Hex 




101 


65 


Punch output support 

X'OO' - Punch output support 

X'80' - ASCII 

X'40' - Compression 

X'20' - Transparency 

X'lO' - Sponning 

X'08' - Inter-record separator 

X'Ol' - Compaction 




102 


66 


PDIR information byte 

X'80' - PDIR outbound allowed 




103 


67 


Card/document flow 
X'OO' - Card/document flow 
X'80' - Card inbound allowed 
X'40' - Card outbound allowed 
X'08' - Document inbound allowed 
X'04' - Documend outbound allowed 




104-111 


68-6F 


Current compaction table in use by outbound 
processor 




104-107 


68-6B 


Compaction table name 




108-111 


6C-6F 


Pointer to CDCB entry 





POWER/VS CONTROL BLOCKS (. . . CONTINUED) 

SNA LOGICAL UNIT CONTROL BLOCK (. . . CONTINUED) 



Bytes 




Description/function of field 


Dec 


Hex 






Process Control Section 


112-115 


70-73 


Start address of TCBs for LU 


112-115 


70-73 


RDR, LGN, LGF, TCB address 


116-119 


74-77 


LST, PUN TCB address 


120-123 


78-7B 


Message TCB address 


124-127 


7C-7F 


RDR 2 TCB address 


128-131 


80-83 


LGH TCB address 


132 


84 


Action byte 

X^SO' - Request logon 

X'40' - Request start reader 

X'20' - Request interrupt LST/PUN on signal 

X'10' - Request interrupt LST/PUN for 

outbound message 
X'08' - Request interrupt inbound for inbound 
X'04' - Request stop session 
X'02' - Request GO/SETUP command 
X'Ol' - Request for restart command 


133 


85 


Process byte 

X'80 - Logoff in process 


134 


86 


Status byte one 
X'80' - BB reject indicator 
X'40' - Logon completed 
X'Ol'- 1 - BB reject by IPWSSOB 
C - BB reject by IPW$$MP 


135 


87 


Status byte two 

X'80' - Change direction 

X'40' - LST/PUN suspended for msg 

X'20' - LST/PUN suspended for inbound 

X'lO' - inbound suspended for inbound 


136 


88 


Bracket state 


137 


89 


Unused 


138-139 


8A-8B 


Buffer size 


140-141 


8C-8D 


Buffer size logon process 


142-159 


8E-9F 


Unused 



How to Locate: 



Displacement X'A8-AB' of SUCB points to the first LUCB. 



POWER/VS CONTROL BLOCKS (. . . CONTINUED) 
SNA UNIT CONTROL BLOCK (SUCB) 



Bytes 




Description/function of field 


Dec 


Hex 


0-15 


00-OF 


Storage descriptor (SUCB) 


16-19 


10-13 


Address of next SUCB 






General Accounting Information 


20-31 


14-lF 


General Information 


20-27 


14-lB 


Date = c M/A/DD/YY 


28-31 


10-lF 


Remote Identifier 


28 


IC 


- Binary format 


29-31 


ID-IF 


- Character format 






List, Punch and Reader Device Characteristics 


32 


20 


List routing remid 


33 


21 


Punch routing remid 

Device status values for the following devices; 

X'80' - Device started 
X'40' - Device available 
X'20' - Output available 


36-39 


24-27 


Printer 1 - C'LSTl' 


40 


28 


Device status 


41-43 


29-2B 


Pointer to LUCB 


44-47 


2C-2F 


Forms ID 


48-51 


30-33 


List output classes 


52-55 


34-37 


Printer 2 - C'LST2' 


56 


38 


Device status 


57-59 


39-3B 


Pointer to LUCB 


60-63 


30-3F 


Forms ID 


64-67 


40-43 


List output classes 


68-71 


44-47 


Printer 3 -C'LST3' 


72 


48 


Device status 


73-75 


49-4B 


Pointer to LUCB 


76-79 


40-4F 


Forms ID 


80-83 


50-53 


List output classes 


84-87 


54-57 


Punch -C'PUNl' 


88 


58 


Device status 


89-91 


59-5B 


Pointer to LUCB 


92-95 


5C-5F 


Forms ID 


96-99 


60-63 


Punch output classes 


100-103 


64-67 


Reader -C'RDRl' 


104 


68 


Device status 


105-107 


69-6B 


Pointer to LUCB 


108-111 


6C-6F 


Forms ID 


112-115 


70-73 


Reader classes 


1V6-119 


74-77 


Console - C'CONT 


120 


78 


Device status 


121-123 


79-7B 


Pointer to LUCB 


124-127 


7C-7F 


Forms ID 


128-131 


80-83 


Console classes 



POWEiyVS CONTROL BLOCKS (...CONTINUED) 



SNA UNIT CONTROL BLOCK (SUCB) (.. .CONTINUED) 



Bytes 










DescripMon/funcfion of field 




Dec 


Hex 




132 


84 


Device List delimiter 




133-134 


85-86 


Reserved 




135 


87 


Device select indicator 




136-143 


88-8F 


Default compaction table for outbound 




136-139 


88-8B 


Name of default table 




140-143 


8C-8F 


Address of default table virtual 




144 


90 


Card/document flow 
X'80' - Card inbound allowed 
X'40' - Card ou/bound allowed 
X'08' - Document inbound allowed 
X'04' - Document outbound allowed 








Message Control Section 


145 


91 


Message request status 








X'80' - Message processor for work station 


is active 






X'40' - Request to interrupt IPW$$OB for 


outbound 






message was issued 




146-148 


92-94 


Pointer to the LUCB with the suspending IPW$$OB | 


149 


95 


Unused 




150-151 


96-97 


No. of messages 




152 


98 


Subchain index 




153 


99 


Temporary delete chain index 




154 


9A 


Terminal type 




155 


9B 


Terminal features 

X'80' - Console specified 








Miscellaneous 


156-159 


9C-9F 


Address of work station lockword 




160-163 


A0-A3 


Inbound work space address 




164 


A4 


Reserved 




165-167 


A5-A7 


Pointer to LUCB. If set then workspace is 
the LUCB being pointed to. 


n use by 


168-171 


A8-AB 


Pointer to first LUCB 




172-173 


AC-AD 


No. of attached LUCBs 




174-175 


AE-AF 


No. of active LUCBs 




176-191 


BO-BF 


Unused 





How to Locate: 



Displacement X'14' - X'17' of SNCB; X'lO' - XM3« of TCB 



PQWERAS control blocks (. . . CONTINUED) 



SNA LOGON REQUEST CONTROL BLOCK (LRCB) 



Bytes 




Description/function of field 






Dec 


Hex 




00-15 


00-OF 


Storage descriptor (LRCB) 


16-19 


10-13 


Pointer to next LRCB 


20-23 


14-17 


Reserved 


24 


18 


Length of one LRCB 


25 


19 


Length of one LRUB 


26 


lA 


No. of total LRUBs in LRCB 


27 


IB 


No. of active LRUBs in LRCB 


28-31 


IC-IF 


Reserved 


32-47 


20-2F 


First LRUB entry 


32-35 


20-23 


ACB address 


36-43 


24-2B 


LU-name 


44 


2C 


Status (X 01 indicates active entry) 


45-47 


2D-2F 


Length of logon message 


48-127 


30-7F 


Remaining LRUB entries 



Displacement X84-X 87 of SNCB. 



PQWER/VS CONTROL BLOCKS (. . . CONTINUED) 
SNA COMPACTION TABLE CONTROL BLOCK (COCB) 



Bytes 




Description/function of field 








Dec 


Hex 






00-15 


00-OF 


Storage descriptor (COCB) 




16-19 


10-13 


Address next COCB 




20-21 


14-15 


Number of entries in COCB 




22-23 


16-17 


Maximum number of GETVIS table entries (IK 


each) 


24-25 


18-19 


Actual number of GETVIS 




26-31 


lA-lF 


Reserved 




32-47 


20-2F 


First Compaction Table Entry 


32-35 


20-23 


Compaction table name 




36-39 


24-27 


Compaction table address 




40 


28 


Compaction table identifier 




41 


29 


Reserved 




42-43 


2A-2B 


Compaction table use counter 




44-45 


2C-2D 


Compaction table length 




46-47 


2E-2F 


Reserved 




48-1023 


30-3FF 


Remaining Table Entries 



Displ 



tX'8C'-X'8F'of SNCB. 



POWER/VS CONTROL BLOCKS (. ■ . CONTINUED) 



SNA WORK AREA (WACB) 



Byt 


es 


■ ■ ■ ■■ ■ ' 

Description/function of field 


Dec 


Hex 






Fixed part of SNA work space 


00-15 


00-OF 


Storage descriptor (WACB) 
Buffer control fields 


16-19 


10-13 


Residual count in buffer 


20-23 


14-17 


Current position in buffer 


24-27 


18-lB 


Address of buffer to SEND/RECEIVE 


28-31 


IC-IF 


Address of buffer in process (FILL) 


32-35 


20-23 


Logical record length 


36-171 


24-AB 


Logical record 


172 


AC 


Processing switches: 

X 02 - End of file 

X 01 - Logical interface open (WALI) 

As used by SNA inbound processor: 

X 80 - Processing console (WAIC) 

X 40 - Processing reader (WAIR) 

X 20 - Unconditional end bracket (WAUB) 

X 10 - Immediate termination required (WATI) 

X 08 - Resume data stream state requested (WASR) . A 

resume FMH was received. 

As used by SNA outbound processor: 

X 80 - EOF reached (WAOF) 

X 40 - EOJ or chain reached (WAOJ) 

X 20 - End of logical record reached (WAOL) 

XIO - End of RU reached (WAOR) 

X 08 - SETUP/GO in progress 

X 04 - FMH3 send indicator 

As used by SNA message processor: 

X 20 - Component not available (WAMC) 

XIO - End of RU reached (WAMR) 


173 


AD 


Status byte 


174 


AE 


Data stream state byte: 

Data stream state flags: 

X 80 - Between data stream (WASB) 

X40 - In data stream (WASI) 

X 20 - End of data stream pending (WASE) 

X 10 - Data stream abort (WASA) 


175 


AF 


Chain state byte: 

Chain state flags: 

X 80 - Between chain (WACB) 

X 40 - In chain (WACI) 

X 20 - End of chain pending (WACL) 

X 10 - End of file (WACE) 


176 


BO 


Processing options: 

X 80 - ASCII (WAAS) 

X 40 - Compression (WACM) 

X 20 - Transparency (WATR) 

X 10 - Spanning (WASP) 

X 08 - Inter-record separator (WARS) 

X 01 - Compaction support 



POWERAS control blocks (...CONTINUED) 
SNA WORK AREA (WACB) (...CONTINUED) 



Bytes 








npcrrmfirin/fiinrfion nf fipld 


Dec 


Hex 


L/C3^l IfJI lUIl/ 1 Ul 1^1 IWll \Jl IICIU 


177 


Bl 


Compaction indicator 

X 40 - Compaction table found 

X 80 - Indigates use count increased 


178-179 


B2-B3 


Reserved 


180-183 


B4-B7 


Save area for LUPH, used by interrupting processors 


184-187 


B8-BB 


Error sense bytes 


188 


BC 


Error message number 


189-191 


BD-BF 


Reserved 


192-195 


C0-C3 


Error routine address 


196-307 


C4-133 


RPL (plus 12 bytes for expansion) 


308-379 


134-17B 


Register save area 


380-491 


17C-1EB 


PL/S dynamic area 


492-503 


1EC-1F7 


Reserved 


504-511 


1F8-1FF 


Function management header (plus 2 bytes for 
expansion) 


504 


1F8 


FMH length byte 


505 


1F9 


FMH type byte 

X 80 - Concatenation 

B 001 1 1 1 1 1 - FMH type 1 


506 


IFA 


FMH select byte 

B 10000000 - Demand select 

B 01110000 - Device select 

B 00000000 -Console 

B 00100000 - Card reader 

B 00110000 -Printer 

B 00001111 - Logical address 


507 


IFB 


FMH flag byte - FMHl ADS sent on inbound data error 
X 80 - ADS send by receiver 


508 


IFC 


FMH properties byte 

B 1 1 100000 - Data stream state 

B 00000000 - Data stream resume 

B 00100000 - Data stream end 

B 01000000 - Data stream begin 

B 01 100000 - Data stream begin and end 

B 10000000 - Data stream interrupt 

B 10100000 - Data stream abort 

B 0001 1 1 1 1 - Data stream characteristics 

B 00010000 - Basic exchange 

B 00000100 - Compression 

B 00000010 - Compaction 


509 


IFD 


FMH. basic exchange length byte 


512-1023 


200-3FF 


Two SNA buffers 



How to Locate; 

Displacement X*14' - XV of TCB and X'20' - X'27' of LUCB. 
1 -96 



POWER/VS CONTROL BLOCKS ( . . ■ CONTINUED) 
SNA MESSAGE CONTROL BLOCK (MSCB) 



I 



By 


es 


Description/function of field 


Dec 


Hex 


00-15 


00-OF 


Storage descriptor (MSCB) 


16-23 


10-17 


Work area 


24 


18 


Free chain index 


25 


19 


Function indicator 


26-27 


lA-lB 


Reserved 


28-31 


IC-IF 


Lockword 
Register save area 


32-35 


20-23 


Register 14 


36-39 


24-27 


Register 15 


40-43 


28-2 B 


Register 


44-47 


2C-2F 


Register 1 


48-51 


30-33 


Register 2 


52-55 


34-37 


Register 3 


56-59 


38-3B 


Register 4 


60-63 


3C-3F 


Register 5 


64-67 


40-43 


Register 6 


68-71 


44-47 


Register 7 


72-75 


48-4B 


Register 8 


76-79 


4C-4F 


Register 9 


80-87 


50-57 


Reserved 



How to Locate : 



Displacement X'74' - X'77' of CAT. 



POWERM control blocks (. . .CONTINUED) 



SNA MANAGER TCB FIELDS 



Byt 


es 


Description/function of field 


Dec 


Hex 






Wait ECB list 


00-03 


00-03 


Receive any ECB address 


04-07 


04-07 


Work ECB address 


08 


08 


End of list(X'FF') 


09-15 


09-OF 


Reserved 


16-19 


10-13 


Address of SNA unit control block (SUCB) 


20-23 


14-17 


Address of SNA work area (WACB) 


24-27 


18-lB 


Save area for register 13 


28-31 


IC-IF 


Reserved 



RJE I/O TRACE 



An I/O trace for an RJE line after SIGNON can be initiated by 
specifying TRACE = YES in the PRMT macro. 

Entries are made in a wraparound buffer in the phase IPW$$TM. 
The following information is recorded at every l/O interrupt 
from' this terminal. 



I 



-32 bytes - 



Up to 127 
entries of 32 
bytes each. 
The last entry 
is followed by 
a blank line of 
32 bytes. Thus, 
the last few 
entries can 
easily be located 
in a dump of the 
buffer 



First 12 bytes Last CCW 
of CCB executed 



First four bytes in •»- 
data buffer (includes 
line control characters) 



Trace entry 



The last line response 
♦ sent or received from 
the terminal 

>Sense information 



Last four bytes of data 
♦buffer (includes TP control 
characters) 



\ 



A data buffer with four 
records (Number of records 
in a data buffer depends 
on type of terminal). 



The trace is to be used when RJE line errors occur or incorrect output 
is encountered which can be caused by the I/O operation. 



POWER/VS FILE DUMP PROGRAM 

This program enables any of the POWER/VS files (account, queue, data) to be dumped 
on a line printer assigned to SYSLST. An option is also provided to enable queue 
records and their associated track groups belonging to specific jobs to be dumped. 

How to Execute 



The program is requested by JCL commands entered either via SYSLOG or SYS IN, 
where SYS IN is assigned to a card reader. Before requesting ensure relevant assignments 
are made for the file to be dumped. 



SERVICE AIDS (...Continued) 

POWEiyVS FILE DUMP PROGRAM (. . .Continued) 



Example Job Stream 

//JOBname 

//ASSGN (SYSOOO for Account file) 

(SYS001 for Queue file) 

(SYS002-6 for Data files) 
//EXEC IPWi$DD 

When the program is loaded successfully, the following message will be issued 
to SYS LOG: 

DUMP FUNCTION = 

At this point one of the following options can be entered via SYSLOG : 

A (to specify the Account file) 

Q (to specify the Queue file) 

D (to specify the Data file) 

Jobname, Jobnumber (, queue) (5) 

EOJ (to enable cancelation of the program or selection of a new option). 

(T) The complete data file will be dumped. 

(2) This enables (a) queue record(s) belonging to a specific job in the RDR, 
LST, or PUN queue plus its associated track group(s) to be dumped. 
Job name may be 8 characters, job number may be 6 characters. For the 
'queue' option one of the following three entries can be specified : 

L for LST queue (default) 
P for PUN queue 
R for RDR queue. 

After the dump is completed, the message 

DUMP FUNaiON = 

is issued to SYSLOG again to enable either a new option to be specified or the 
program to be terminated by the option HOJ. 

Format of Output 

For every 100 bytes, a block of four lines is printed. Line 1 contains the printable 
characters in those bytes; line 2 contains the zone-part of each byte; line 3 contains 
the numeric part of each byte; line 4 contains a scale indicating the position of the 
bytes in the string. 

line 1 : CHAR // JOB POWJOBOl DATE 08/19/7U, 

line 2 : ZON 66UDDC4DDEDDCFFH44U44U44Uit 44UUCCECUFF6FF6FF6 

line 3: NUMR 11016207661620100000000000 OOOOU13500811917UB 

Iine4: 01. . . 5 . . .10 . . .15. . . 20 . . . 25 . . 85 . . .90 . . .95 



CHAPTER II 

VTAM CONTROL BLOCKS 



VTAM CONTROL BLOCK RELATIONSHIP 
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PROCESS SCHEDULING CONTROL BLOCK RELATIONSHIPS 
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Pageable 
Storage 
















System 
Save Area 














System 
RPH 






System 
CRA 




* Processing Sequence 


User 
Save Area 






User 
RPH 






Storage 
Request 
RPH 






Dynamic 
PAB 





PROCESS SCHEDULING CONTROL BLOCK RELATIONSHIP (. . . .Cont'd) 







RPH 








Oldest RPH 








- 




*1 






PAB 






Oldest PAB 






t next PAB - 


_J 


' 




J 




f next Work 
Element 


- 






-| 




















Work Elemen 






Work Elemen 


t 






*6 — 


-1 






*5 — 


-1 
















Work Element 






Work Elemen 


t 




n 


*4 






*3 





I 



'' Processing Sequence 



11-03 



ACB 


VTAM AC 

Hex 


4 

8 

C 

10 

14 

18 
IC 

24 

28 

2C 
30 


1) 








Dec 





1 


2 


3 





(oiNMOOOOS 
ACB ID 


(a)NM00009 
ACB Subtype 
Field 


ACBLEN2 
ACB Length 


4 


ACBAPID 
Application Indentifier Ptr. 


8 


ACBINRTN 
Interface Routine Addr. 


12 


(oiNMOOOlO 
Not used 


16 


@NM00011 
Not used 


(aiNM00012 
Not used 


(oiNMOOOlS 
Flag Field 
ACBMACR2 


20 


ACBAM 
DTF type 
ACBDOSID 


(oiNMOOOlS 
ACBOFLGS 


(oiNMOOOl? 
Access Method 
ID 


(a)NM00018 
ACBERFLG 


24 


(oiNMOOOl? 
Reserved 


ACBDEB 
DEB Pointer 


28 


(aiNAA00020 
ACB DDNAME 


36 


ACBPASSW 
Password Pointer 


40 




AQ 
Branch Re 


RTN 
turn to User 


44 




(5)NM00021 
Not used 


48 


ACBUEL 
Pointer User Exit List 



ACB(VTAMACB) (...Continued) 



Alphabetical List of Fields In(aNM00007 

Field Dec Hex Field Dec Hex Field 



(aNMOOOOS 
@NM00009 
@NM00010 
@NM00On 
@NM00012 
@NM00013 
@NM00015 



0000 0000 @NM00017 

0001 0001 @NM00018 
0012 OOOC @NM00019 
0016 0010 @NM00020 

0018 0012 @NM00021 

0019 0013 ACBAM 
0021 0015 ACBAPID 



0022 0016 ACBDEB 

0023 0017 ACBINRTN 

0024 0018 ACBLEN2 
0028 00 IC ACBPASSW 
0046 002E ACBRTN 
0020 0014 ACBUEL 
0004 0004 



Dec Hex 



0025 0019 

0008 0008 

0002 0002 

0036 0024 

0040 0028 

0048 0030 



I 



Flag Meanings 

Hex FlagByfe Contents Bit Pattern Pattern 

Disp Pattern Name Meaning 

0013 (q)NM00013 Flag Field ACBMACR2 1 ACBLOGON LOGON Bit Flag 1 = 

NLOGON,0=LOGON 

.1111111 (a)NM00014 Not used 

0015 (a)NM00015 ACBOFLGS 1 ACBVOLMT Verify volume mounted 

.1 ACBVMSG Message requested bit 

..1 ACBEOV EOV concatenation 

...1 .... ACBOPEN ACB is open 

1 . . . ACBCAT ACT for AMO cat 

1.. ACBEXFG User Exit flag 

1. ACBJRNL JRNL was loaded 

by Open 
1 ACBLOCK ACB is locked 



Constonts in the VTAM ACB 

Label Value Meaning 

DTF Type - stored in ACBAM 

ACBVTAM X'60' VTAM 

The following equates are for the 'ACBERFLG' field, and should be used in additior 
the ones previously defined above. 

Open Equates 

ACBNORM X'OO' Normal completion 

ACBOANAT X'50' VTAM Not active 

ACBOAHLT X'52' VTAM active, but halting 

ACBOAVFY X'54' APPL verification foiled 

ACBOANSN X'56' Non-APPLID name specified 



ACP (VTAM ACB) ( . . . ConMnued) 



Constants m the VTAM ACB (. . .Continued) 



Open Equates (continued) 



ACBOAPAA 


X'58' 


ACBOAPNM 


X'5A' 


ACBOVINA 


X'5C' 


ACBOAPSE 


X'5E' 


ACBOUNDF 


X'60' 


AC BOAR LE 


X'62' 


ACBOPWSE 


X'64' 


ACBOPWLE 


X'66' 


ACBRNOOF 


X'68' 


Close Equates 




ACBNMAIN 


X'46' 


ACBMNJSTP 


X'48' 



ACBCDSNR X'42' 

ACBRNOCF X'4C' 

ACBVTLEN 52 

ACBTYPE X'23' 



Application active already 

No matching APPLID entry 

VTAM in system but not active 

APPLID not in REQ's space 

Indeterminont error 

APPLID length invalid 

Password not in REQ's space 

Password length invalid 

A primary POA issued an open ACB but another 

primary POA is currently active - open failed 



Open or close not issued in mainline 

Open or close not issued under jobstep TCB 

for non priviliged task 

Destinations not released 

Close failed - POI queue not empty 

ACB length 

ACB type 



ACDEB (ISTACDEB) 



1 



ACDTYPE 
Control Block 
Type 



ACDLNGTH 
Control Block 
Length in 
Bytes 



ACDSAF 
Flags 



ACDCHN 
Chain field 



ACDTSKID 
Task ID 



ACDRSV08 
Reserved Preserve Alignment 



ACDDBPFX 
VTAM DEB Prefix Section 



ACDBASIC 
BASIC DEB Section 



ACDVTAM 
VTAM DEB Section 



ACDSIP 
SESSION Control inbound PAB 



ACDSOP 
SESSION Control Outbound PAB 



ACDEB (ISTACDEB) (...Continued) 






1 


2 


3 


ACDASFQ 
ADDR 1st FMCB on DFASY ANY Q 


ACDREFQ 
ADDR 1st FMCB on RESP ANY Q 



ORG ACDTYPE 



ACDOPNAD 
First byte of 
DEB for open 



ORG ACDDBPFX 



ACDRSVOl 
Reserved 



ACDLENG 
Length for OS 



ACDAMTYP 
Acces Method 
Type for OS 



ACDRSV02 
Reserved 



ACDRSV03 
Reserved 



ORGACDBASIC 



ACDTCB 
Pointer to TCB owning this DEB 



ACDDEB 
Pointer to next DEB on DEB Chain of TCB 



ACDPRLEN 
Prefix Length 



ACDDEB ID 
Owner DEB 
identification 



ACDRSV04 
Reserved 



ORG ACDACBAD 



ACDRSVIO 


ACDACB 
Pointer to Appi. ACB 



ORG ACDVTAM 



ACDLOCK 
Deblock Lock 



ACDEB (ISTACDEB) (.. .Continued) 



ACDRDTE 
Pointer to RDT Entry 



ACDFMCB 
Addr of 1st FMCB on FMCB queue of this DEB 



ACDRAFQ 
Addr of 1st FMCB on Readany FMCB Que 



ACDRARQ 
Addr of 1st RPL on readany RPL que 



ACDPSST 
Addr of the PSS table 



ACDRSV33 
Reserved 



ACDNEPAB 
PSS solicit/read any PAB 



ACDSSPAB 
PSS system services PAB 



ACDSSFLG 
System service 
flags 



I 



ORG ACDVTAM-h55 





ACDRSV06 
Reserved 


ACDRSV07 
Reserved 




ACDPAPDAT 
Application - ID section 





ACDEB (ISTACDEB) (. . . Continued) 
Dec Hex 



12 3 



ORG ACDAPDAT 



107 6B 



ACDAPDDT 
Application Data 



ORG ACDVTAM + 76 



ACDCLDEB 
Close DEB Chain Pointer 



ACDAPDLN 

Length of Applicatio 

ID Data 



ACDOCWAD 
Addr of OCW for use by Close ACB 



ACDRSVl 1 
Reserved for Alignment 



Alphabetical List of Fields in ISTACDEB 



Field 


Dec 


Hex 


Field 


Dec 


Hex 


Field 


Dec 


Hex 


ACDACB 


0037 


0025 


ACDLNGTH 


0001 


0001 


ACDRSV06 


0105 


0069 


ACDACBAD 


0036 


0024 


ACDLOCK 


0040 


0028 


ACDRSV07 


0106 


006A 


ACDAMTYP 


0021 


0015 


ACDNEPAB 


0072 


0048 


ACDRSV08 


0012 


OOOC 


ACDAPDAT 


0107 


006B 


ACDOCWAD 


0120 


0078 


ACDRSVIO 


0036 


0024 


ACDAPDDT 


0108 


006C 


ACDOPNAD 


0000 


0000 


ACDRSVl 1 


0124 


007C 


ACDAPDLN 


0107 


006B 


ACDPRLEN 


0032 


0020 


ACDRSV33 


0064 


0040 


ACDASFQ 


0160 


OOAO 


ACDPSST 


0060 


003C 


ACDSAF 


0002 


0002 


ACDBASIC 


0024 


0018 


ACDRAFQ 


0052 


0034 


ACDSIP 


0128 


0080 


ACDCHN 


0004 


0004 


ACDRARQ 


0056 


0038 


ACDSAOP 


0144 


0090 


ACDCLDEB 


0116 


0074 


ACDRDTE 


0044 


002C 


ACDSSFLG 


0104 


0068 


ACDDBPFX 


0016 


0010 


ACDREFQ 


0164 


00A4 


ACDSSPAB 


0088 


0058 


ACDDEB 


0028 


OOIC 


ACDRSVOl 


0016 


0010 


ACDTCB 


0024 


0018 


ACDDEBID 


0033 


0021 


ACDRSV02 


0022 


0016 


ACDTSKID 


0008 


0008 


ACDFMCB 


0048 


0030 


ACDRSV03 


0023 


0017 


ACDTYPE 


0000 


0000 


ACDLENG 


0020 


0014 


ACDRSV04 


0034 


0022 


ACDVTAM 
ACDVTPRX 


0040 
0000 


0028 
0000 



ACDEB (ISTACDEB) (...Continued) 



Hex Flag Byte 
Disp 



0068 ACDSSFLG .System Service Flags 



Pattern 


Pattern 


Name 


Meaning 


ACDCACB 


Close ACB in 1 




Progress | 


ACD ABEND 


If ABEND or 




CANCEL in 




progress, used 




as flag to indicate 




that a dump must 




be taken 


ACDAICLS 


CLOSE issued in 




ISTRAAAl 


ACDRSV09 


Reserved 



Constants in ISTACDEB 



Label Value Meaning 

ACDID X'OF' VTAM Data Extent Block ID 



AOt (ISTAOT) 



Dec Hex 







1 


2 


3 


AOTAPT 
Pointer to APT for this task 


AOTCNT 
Count of open 
ACBs for this 
task 


AOTDSBYT 
Used by 
ISTAPCAS to 
disable via 
STNSM 


AOTRSV02 
Reserved 


AOTRSV03 
Reserved 


AUTOFIAGB 
Flags 


AOTRSV04 
Reserved 



AOTFLAGA 
Flags 



ORG AOTAPT + 1 



Org AOTAPT 



AOTAPTA 
Same as AOTAPT 



aotobb 



ORG AOTOBB 



AOTBVA 
Start Addr of VTAM Partition 



AOTVEA 
End Addr of VTAM Partition 



Alphabetical List of Fields in ISTAOT 
Field Dec Hex Field 



Dec 



Hex Field 



Dec Hex 



AOTAPT 0000 0000 AOTFLAGA 0000 0000 AOTRSV03 0008 0008 

AOTAPTA 0001 0001 AOTFLAGB 0012 OOOC AOTRSV04 0013 OOOD 

AOtONT 0004 0004 AOtOBB 0000 0000 AOtvBA 0000 0000 

AOTDSBYT 0005 0005 AOTRSV02 0006 0006 AOtVEA 0004 0004 



AOT(ISTAOT) (...Continued) 
Flag Meanings 



) Hex Flag-Byte Contents 
Disp 



OOOC AOTFLAGB Flags 



0000 AOTFLAGA Flags 



Bit Pattern 


Pattern 


Pattern Name 


Meaning 


1 AOTTPEAL 


TPIN macro has 




been issued, used 




only in Attention 




Task AOT 


.1 aotdump 


Dump taken on 




termination, used 




on in a main task 




AOT 


..1 aotcncl 


Cancel postponed 




for APS to finish 


...1 .... AOTVTDLY 


Timer exit delayed 




by VTAM AP 


.... 1.... aotue 


User exit processing 


1.. AOTVTSVC 


VTAM SVC 53 or 




SVC49 


1. AOTSWAP 


VTAM process 




dispatching 


1 AOTSKEY 


Supervisor key 




forced for this 




task VTAM 


1 AOTCAP 


DOS dispatcher call 




to iSTAPCAS needed 


.111 nil AOTRSVOl 


Reserved 



APT (ISTAPT) 
Dec Hex 



16 10 



28 IC 



APTAPTX 
Pointer to pageable portion of APT 



APTRPH 
Posted RPH queue anchor 



APTPAB 
Scheduled PAB queue anchor 



APTUECB 
Scheduled user exit queue anchor 



APTLPSW 
PSW for VTAM dispatching of this task 



APTPIB 
Pointer to PI B for task 



APTAOT 
Pointer to AOT for task 



ORG APTAPTX 



APTFLAGA 
Flags 



ORG APTAPTX+1 



APTAPTXA 
Pointer to pageable portion of APT 



QNMOOOOl 
F lags in CS 
Operation 



ORG APTLPSW 



16 10 

20 14 



APTPABA 
Scheduled PAB queue anchor 



APTSYA^K 


APTLAMWP 


@NM00002 


(aJ NM00002 
(Cont) 


APTIADDR 



APT (ISTAPT) (...Continued) 



Alphabetical List of Fields in ISTAPT 



Dec He; 



Field 



(oiNMOOOOl 0008 0008 APTFLAGA 

@NM00002 0018 0012 APTLADDR 

APTAOT 0028 00 IC APTLAMWP 

APTAPTX 0000 0000 APTLPSW 

APTAPTXA 0001 0001 APTPAB 



0000 0000 APTPABA 

0021 0015 APTPIB 

0017 0011 APTRPH 

0016 0010 APTSYMSK 

0008 0008 APTUECB 



Dec Hex 



0009 0009 

0024 0018 

0004 0004 

0016 0010 

0012 OOOC 



Flag Meanings 



Hex Flag byte 
Disp 



APTFLAGA Flags 



lit 


Pattern 


Pattern 


attern 


Name 


Meaning 




APTRPHBY 


Pre-ailocated 
RPH is in use 


1 


APTSUSP 


Waiting for 
Storage Request 


.1 


APTVSKEY 


Status of Super- 
visor key bit on 
entry for VTAM 
Process Dispatch 


..1 .... 


APTUSKEY 


Same for User 
exits 


... 1... 


APTUE 


User exit being 
processed 


... .111 


APTRSVOl 


Reserved 



APT (ISTAPTX) 
Dec Hex 



12 C 

16 10 



APTHDR 
Dummy header 



APTCHAIN 
Chaining field 



APTTSKID 
Task ID of fhis task 



APTXRSVl 
Reserved 



APTXPAB 
PAB for TPIO spec scheduling 



APTSAVEV 
Save area for VTAM process dispatching 



APTSAVEU 
Save area for user exit dispatching 



APTXRPH 
Pre-allocoted RPH for VTAM process dispatching 



APTXCRA 
CRA for above RPH 



APTSMRPH 
RPH for storage request 



APT (ISTAPTX) (...Continued) 
Dec Hex 



APTADRR 
Range of Storage for this Partition 



APTSVAR 
Range of shared Virtual Storage 



I 



ORG APTHDR 



APTTYPE 
Control Block 
Type 


APTXRSVO 
Reserved 


APTLNGTH 
Length of ISTAPTX 



ORG APTADRR 



APTADRS 
Start of Range 



APTADRE 
End of Range 



ORG APTSVAR 



APTSVAS 
Start of Range 



APTSVAE 
End of Range 



Alphabetical List of Fields in ISTAPTX 



Field 


D^c 


Hex 


Field 


Dec 


Hex 


Field 


Dec 


Hex 


APTADRE 


0892 


037C 


APTSAVEV 


0032 


0020 


APTXCRA 


0284 


one 


APTADRR 


0888 


0378 


APTSMRPH 


0780 


030C 


APTXPAB 


0016 


0010 


APTADRS 


0888 


0378 


APTSVAE 


0900 


0384 


APTXRPH 


0176 


00 BO 


APTCHAIN 


0004 


0004 


APTSVAR 


0896 


0380 


APTXRSVO 


0001 


0001 


APTHDR 


0000 


0000 


APTSVAS 


0896 


0380 


APTXRSVl 


0012 


oooc 


APTLNGTH 


0002 


0002 


APTTSKID 


0008 


0008 








APTSAVEU 


0104 


0068 


APTTYPE 


0000 


0000 








Constants in 


ISTAPTX 
















Label 


Value 




Meaning 












APTXTYP 


XM6' 




Setting va 


ue for type. 














11-17 











ATCVT (ISTATCVT) 



Dec Hex 




272 110 

276 114 

280 1 18 

284 lie 

288 120 

292 124 

296 128 

300 12C 

304 130 



ATCCOM 
System Independent- Fields 



ATCMAXID 
Maximum number 
of ma|or nodes, 
0= number of * 



ATCRSV16 
not used 



ATCMNT 
PTR to maipr node table - set by Sys.Def.Ref. by ISTSDCCB 
(CBDEF), I5TSDCCI (CINDEXY/ ^ \ 



ATCCDADD 
PTR to CIDADD routine ISTSDDCA ref . by CIDCTL macro 



ATCCDDEL 
PTR to CIDDEL routine ISTSDCCD ref. by CIDCTL macro 



ATCCDFND 
Ptr to CIDFND routine lATSDCCF ref. by CIDCTL macro 



ATCESCOl 
PTR to ESCOl 



ATCESC02 
PTR to ESC02 



ATCCSMR 
PTR to connection services master routine 



ATCOCRT 
PTR to open/close routine 



ATCUEP 
Pointer to user exit 



* Entries in the MNT. 



ATCVT (ISTATCVT) ( Continued) 
Dec Hex 



308 134 



320 140 

324 144 

328 148 

332 14C 

336 150 

340 154 

344 158 

348 15C 

352 160 

356 164 



ATCSHRTN 
Name of VTAM shared RTN to be loaded 



ATCSHRFG 
Attribute flags 



ATCXRANG 
Number of bits 
in X-value 
portion of CID 



ATCSAF 
Sub area address field 



ATCEPA 
Entry point addr of loaded 



ATCALERT 
Pointer to alert-routine ISTSDCAL 



ATCDVLOD 
Pointer to ISTSDCOD 



ATCTRCPT 
Pointer to trace parm list 



ATCDVT 
Pointer to first DVT on chain 



ATCEPT 
Pointer to first EPT on chain 



ATCMSGP 
Pointer to TPMSG processor 



ATCMSGM 
Pointer to TPAASG - message CSECT 



AiaRPAB 
Address of trace writer PAB 



ATCVT LOD 
Address of VTAM load list 



ATCVT (ISTATCVT) ( Continued ) 
Dec Hex 



360 168 

364 16C 

368 170 

372 174 



380 17C 

384 180 

388 184 

392 188 

396 18C 

400 190 

404 194 

408 198 



ATCECPRT 
ECB for trace file print 



ATCZDVTB 
Address of ISTZCFBI 



ATCEaLP 
TOLTEP ECB 



ATCRVCHS 
Reserved 



ATCCRME 
Vary PSS control mechanism 



ATCHPGM 
Buffer information 



ATCDEBCH 
Close DEB chain Pointer 



ATCTODVT 
The TOLTEP DVT ptr pointed to by 3rd word of PAB 



AT CADE L 
A delete routine address 



ATCCDPTR 
Pointer to ISTOCCCD- DOS only 



ATCLDNCS 
Pointer to NCSPL for load/dump 



ATCLDECB 
ECB fo load/dump subtask 



ATCVT (ISTATCVT) (Continued) 



Dec Hex 

412 19C 

416 lAO 

420 1A4 

428 lAC 

432 IBO 

440 1 B8 

444 IBC 

448 ICO 

452 1C4 

456 1C8 

460 ICC 

464 IDO 

468 1D4 

472 1D8 

476 IDC 



ATCFESS 
Pointer to ISTCFESS 



ATCAPCR5 
Pointer to ISTINCR5 



ATCNODEL 
VSAM Data Set name 



ATCNODDS 
Pointer to RPL 



ATCONFIG 
Start VTAM Config = Parameter 



ATCRSV99 
Reserved for later pointers 



ATCAP33 
Pointer to ISTAPC33 



ATCAP35 
Pointer to iSTAPC35 



ATCAP36 
Pointer to ISTAPC36 



ATCDVTLK 
Lock word for DVT lock 



ATCCDFIN 
Pointer to ISTSDCRR 



ATCCDFDN 
Pointer to ISTSDCCN 



ATCVOCLK 
VOCLOCK lock 



ATCRDTLK 
RDTLOCK lock 



ATCRSV97 
DWORD alignment 



ATCVT (ISTATCVT) ( Continued) 



Dec Hex 
480 lEO 



576 240 

580 244 

584 248 

588 24C 



ATCVPABi 
PAB for vary under PSS Control 



ATCPGPAB 
ERP PAB for purge 



ATCDLRPB 
Dump load & restart PAB 



ATCCCLAD 
Address of vary ERP (ISTINCCL) 



ATCCDLAD 
Address of vary dump, LD rstrt (ISTINCDL) 



ATCOCCOB 
Address ISTOCCOB 



ATCOCCCB 
Address ISTOCCCB 



ATCVT (ISTATCVT) ( Continued) 



Dec Hex 
592 250 






1 


2 


3 


AiaiPAB 
- A pab for ISTOLTP 


ATCTCIPB 
: A pab for TOLTEP CLIP ^ 


ATCVT IPB 
: A pab for TOLTEP - VTAM interface 


ATCTCLOM 
Addr TOLTEP CLOP proc. 



ATCVT (ISATCVT) ( Continued) 



Dec Hex 
692 2B4 

696 2B8 



AiaCLIM 
Addr TOLTEP Clip proc. 



ATCVT I NM 
Addr TOLTEP-VTAM Inff proc. 



ATCTACB 
TOLTEP ACS 



ATCRSVIO 
Reserved 



ATCPTROO 
APAB 



ATCCFEAD 
Addr of ISTINCFE 



ATCVLCNT 
Vary device online counts 



ATCS49XI 
Address of ISTPICXI 



AICS49XL 
Address of ISTPICXL 



ATCVT (ISATCVT) (...Continued) 
Dec Hex 



784 310 



832 340 



836 344 



ATCPODVT 
Pointer to Program Operator DVT 



ATCSOPD 
Session Control 



ATCSIPD 
Session Control 



ATCSECST 
Session Controlsess Term 



ATCNMaR 
Name Counter 



ATCSTAT2 
Trace flags 



(oiNMOOOlS 
Reserved 



ATCSRTAB 
Search LOGON Mode Table RTN Address (ISTINCSH) 



ATCUSSPT 
Default USS Definition Table Address (ISTINCDT) 



ATCMODTB 
Default System LOGON Mode Table Address (ISTINCLM) 



ATCINCW3 
Address of ISTiNCW3 



ATCIOECB 
ECB Used by lOS - Pointed to by lOBECEPT 



ATCVT (ISATCVT) (...Continued) 

















Dec 


Hex 
348 

368 

388 
38C 
390 





1 


2 


3 


840 


ATCVDPAB 
SSCP Command Processing PAB 


872 


ATCVFPAB 
SSCP Front End PAB 


904 


ATCVDLCK 
SSCP Serialization Lock 


908 


ATCMDCNL 
Cancelled Command Data 


912 


ATCDOS 
DOS Only fields 




ORG A 


TCCOM 










ATCSTAT 
VTAM Status Indicators 




ORG A 


TCSTAT 










ATCSTAT 1 
VTAM status 
byte 1 






ORG A 


TCSTAT+1 






1 


1 

ORG ATCSTAT+2 
2 

ORG ATCSTAT+3 
3 


ATCSTFLG 
Storage 
Management 
Flags 












2 




ATCPOFLG 
Program operator 
interface flags 












3 




ATCSTAT4 
VTAM status 
byte 4 




ORG A 


TCCOM+4 






4 


4 


ATCAPI 
Address of API Routine 



ATCVT (ISATCVT) ( Continued) 
Dec Hex 



36 24 



ATCDCFRR 
Pointer to FRR of control layer, initialized by OPENDEST 



I 



ATCRDT 
Pointer to first RDT 



ATCSRT 
Pointer to SRT directory 



ATCRSV70 
Reserved 



ATCECMOD 
ECB for modify command proc. 



ATCMODQ 
Pointer for output queue for modify command 



ATCECHLT 
ECB for halt command 



ATCHALTQ 
Pointer to output queue for halt command 



ATCECVRY 
ECB for vary command proc. 



ATCVARYQ 
Pointer to output queue for vary command 



ATCECDSP 
ECB for display command 



ATCDSPLQ 
Pointer to output queue for display command 



ATCOCHA 
Pointer to OCT header 



ATCVT (ISATCVT) ( Continued) 



Dec Hex 
60 3C 



72 48 



100 64 
104 68 

108 6C 



ATCECSES 
ECB to Half Session Mode 



ATCECVRQ 
ERP ECB for Vary Req. Info. Request Notification 



ATCVPARM 
Address of Vary Parameters 



ATCECOPC 
ECB to Indicate Operator Control Processing Complete 



ATCECNET 
ERP ECB for Network Configuration Request 



ATCECPRM 
Pointer to QAB for ERP's ECB Parameters 



ATCHLTMS 
Pointer to Halt Command or Halt Return Message 



ATCFSB 
Pointer to Feedback Status Block 



ATCRSV71 
Reserved 



ATCRDTH 
Pointer RDT Header 



ATCACaA 
Pointer to Installation Accounting Routine 



ATCAUTHA 
Pointer to Installation Authorisation Routine 



ATCPTCHA 
Pointer to VTAM Patch Area 



ATCVT (ISATCVT) ( Continued) 



Dec Hex 

112 70 

116 74 

120 78 

124 7C 

128 80 

132 84 

136 88 

140 8C 



ATCCONFT 
Pointer to VTAM Configuration Table 



ATCFDVT 
Pointer to first DVT for O/C 



ATCFEPT 
Pointer to first EPT for O/C 



ATCDVTPT 
Address of load mod for type = VTAM tracing 



ATCBPDA 
Pointer to buffer pool directory 



ATCADD 
Pointer to ADD procedure 



ATCREMOV 
Pointer to remove procedure 



ATCIOTRC 
Pointer to I/O trace procedure 



140 8C 

C 
140 8C 

C 

144 90 

148 94 
152 98 



Pro ATCIOTRC 



ATCTHTRC 
Addr of TH trace routine 



Or g ATCTHTRC 



ATCTPBUF 
TPIOS buffer trace (ISTRARTP) 



Org ATCCOM+144 



ATCBFTRC 
Pointer to buffer trace procedure 



ATCFBRPH 
Addr of feedback proc RPH 



ATCBLDLA 
Addr of BLDL routine 



ATCVT (ISATCVT) ( Continued) 



Dec H6x 
156 9C 



168 A8 

172 AC 

176 BO 

180 B4 



ATCALOAD 
Addr of Aload Routine 



ATCREADA 
Addr of Source Read Routine 



ATCGTSTR 
Addr of Getstor Routine 



ATCFRSTR 
Addr of Freestor Routine 



ATCSTMA 
Addr of SM Initialization Routine 



ATCACDA 
Addr of First ACDEB 



ATCSMRQ 
Addr of Request Storage Routine 



ATCSMQU 
Addr of Queue Request Rtne 



ATCSMRS 
Addr of Release Storage Routine 



ATCSMRC 
Addr of Recover Storage Routine 



ATCSMBQ 
Pointer to Q'ed Req. SMS RoutIn( 



ATCFIRA 
Addr of Feedback Initiation RPH 



ATCSRTAD 
Pointer to SRTADD routine 



ATCVT (ISATCVT) ( Continued) 



Dec Hex 
208 DO 



252 FC 



ATCSRTDF 
Pointer to Settiele Routine 



ATCDCC60 
Pointer to iSTDCC60 - Ctl. layer move to user area 



ATCDCC61 
Pointer to iSTDCC61 - Ctl. layer move fixed to pagable 



ATCNERST 
Pointer to ISTDCCOO - Request - ST 



ATCNERCV 
Pointer to 1STRCC21 - Receive OB 



ATCNERNE 
Pointer to iSTDCC25 - Read - ANY 



ATCNERFN 
Pointer to ISTDCC02 - Request - FN 



ATCAPOST 
Pointer to VTAM Post Routine 



ATCVTMID 
Host major node I.D. 



ATCRSVll 
Reserved 



ATCRCC63 
HSKPANYQ Pointer 



ATCRCC26 
Send Response Pointer 



ATCRCC65 
Set RPL Pointer 



ATCNESAL 
Pointer to ISTDCC24 - Solicit - All 



ATCVT (ISATCVT) ( Continued) 



Dec Hex 

260 104 

264 108 

268 IOC 






1 


2 


3 


ATCNERAP 
Pointer to ISTDCC85 - Read Any Purge 


ATCACTRM 
Count of Active Terminals 


ATCCIDM 
CID Mask 


ATCMSGSP 
Reserved for 
msg suppression 









296 128 



Org ATCCSMR 



ATCCSMA 
Pointer to connection Service Master Routine 



Or g ATCHPGM 



ATCHBFNO 
Number of buffs for 
channel 



ATCHBSIZ 
Buffer size in bytes 



Org ATCVLCNT 
772 304 



ATCRNCNT 
370X Count 



ATCLCLa 
3270 Count 



788 314 



OR G ATCRNO 



(a)NM00013 



ATCPOIA I 

Pointer to Program Operator Interface Area 



Org ATCSOPD 
792 318 



ATCSECOl 
Outbound processing 



ATCSECIO 
DVT 



Or g ATCSIPD 
800 320 



804 324 
808 328 



ATCSEC21 
Inbound processing 



ATCSEC30 
Feedback 



ATCSEC40 
DVT 



Or g ATCSECST 
812 32C 



ATCSEC51 
Recovery DVT 



Or g ATCMDCNL 

908 38C (ATCMDCNT 

Size of buffer 



ATCMDPTR 
Address of Buffer 



ATCVT (ISATCVT) (Continued) 



12 3 



ATCPRTYQ 
Priority Msg Queue Anchor 



ATCSYSCN 
Address of SYS CON Routine 



ATCCIBPL 
Address of Lib Pool 



ATCOACBA 
Address of Open ACB Routine 



ATCCACBA 
Address of Close ACB Routine 



AiaET 
Address of VTAM TET 



AiaETC 
Addr of Current Task Entry in TET 



ATCSV53T 
Addr of Function Table for SVC53T 



ATCSCHRT 
Address of Return to Asynchronous 
Processing Scheduler 



ATCAPESH 
Address of Module to schedule a PAB 
(ISTAPESH) 



ATCAPCST 
Address of ISTAPCST 



ATCSTATA 
Addr of Local Device Status Collector 



ATCLAHRA 
Addr of Local 3270 Attention Handler RPH 



ATCVT (ISATCVT) (Continued) 
Dec Hex 



964 3C4 



ATCRCCYO 
Ptr to Post= Sched Proc. 



ORG ATCRCCYO 



ATCRCFYO 
Alias 



ORG ATCDOS+56 



984 3D8 



ATCINDIC 
Reserved 



ATCSRPAB 
System Reset PAD address 



ATCINBA 
Addr of System Console Input Buffer 



ATCECBA 
Addr of System Console Input BC 



ATCFQE 
Ptr to Primed Queue Elements 



ATCEIRPH 
RPL Header for Activating Error Msg 
Writer for I/O completion 



ATCFLAGS 
Flag Byte 



ORG ATCDOS+182 



1094 446 



ATCSVC33 
SVC 33 Instruction 



ATCFLDA 
Start of Fixed Area 



ATCVT (ISATCVT) (Continued) 



1100 44C 



1124 464 



ATCDTFBL 
DTF Builder Routine Address 



ATaiMER 
Timer Subroutine Address 



ATCR7SVE 
Save R7 for 1ST AREAS 



ATCGVPAG 
Addr of Pageable Area in GETVIS Region 



ATCDCC3X 
Ptr to ISTDCC3X-Extn to 1STDCC30 
for Performance 



ATCRTDOS 
Return to DOS 



ATCRVPTD 
Reserved 



ATCNSECB 
ECB for Attaching NETSOL 



I 



ORG ATCNSECB 



ATCNSPAD 
Alignment 


ATCNSRC 
Return Code 



ORGATCDOS+216 



1128 468 

1132 46C 
1136 470 



ATCNRMQ 
Normal Msg Queue Anchor 



ATCAON 
Pointer to ISTAON 



ATCPOBAB 
PO DYPAB for reply processing, POI Termination, and VTAM 
Message Processor 



ATCSTXOC 
Pointer to first XOC on queue 



ATCVT (ISTATCVT) (Continued) 



Alphabetical List of F 


ields in 


ISTATCVT 












Field 


Dec 


Hex 


Field 


Dec 


Hex 


Field 


Dec 


Hex 


(aNM00013 


0788 


0314 


ATCDVTLK 


0456 


01C8 


ATCMODQ 


0028 


OOIC 


§ NM00015 


0819 


0333 


ATCDVTPT 


0124 


007C 


ATCMODTB 


0828 


033C 


ATCACCTA 


0100 


0064 


ATCECBA 


0976 


03D0 


ATCMSGM 


0348 


015C 


ATCACDA 


0176 


00 BO 


ATCECDSP 


0048 


0030 


ATCAASGP 


0344 


0158 


ATCACTRM 


0264 


0108 


ATCECHLT 


0032 


0020 


ATCMSGSP 


0268 


OlOC 


ATCADD 


0132 


0084 


ATCECMOD 


0024 


0018 


ATCNERAP 


0260 


0104 


ATCADEL 


0396 


018C 


ATCECNET 


0076 


004C 


ATCNERCV 


0224 


OOEO 


ATCAiaN 


1132 


046C 


ATCECOPC 


0072 


0048 


ATCNERFN 


0232 


00E8 


ATCALERT 


0324 


0144 


ATCECPRM 


0080 


0050 


ATCNERNE 


0228 


00E4 


ATCALOAD 


0156 


009C 


ATCECPRT 


0360 


0168 


ATCNERST 


0220 


OODC 


ATCAPCR5 


0416 


OlAO 


ATCECSES 


0060 


003C 


ATCNESAL 


0256 


0100 


ATCAPCST 


0952 


03 B8 


ATCECTLP 


0368 


0170 


ATCNMCTR 


0816 


0330 


ATCAPESH 


0948 


03B4 


ATCECVRQ 


0064 


0040 


ATCNODDS 


0428 


OlAC 


ATCAPI 


0004 


0004 


ATCECVRY 


0040 


0028 


ATCNODEL 


0420 


01A4 


ATCAPOST 


0236 


OOBC 


ATCEIRPH 


0984 


03D8 


ATCNRMQ 


1128 


0468 


ATCAP33 


0444 


01 BC 


ATCEPA 


0320 


0140 


ATCNSECB 


1124 


0464 


ATCAP35 


0448 


OICO 


ATCEPT 


0340 


0154 


ATCNSPAD 


1124 


0464 


ATCAP36 


0452 


01 C4 


ATCESCOl 


0288 


0120 


ATCNSRC 


1127 


0467 


ATCAUTHA 


0104 


0068 


ATCESC02 


0292 


0124 


ATCCACBA 


0924 


039C 


ATCBFTRC 


0144 


0090 


ATCFBRPH 


0148 


0094 


ATCOCCCB 


0588 


024C 


ATCBLDLA 


0152 


0098 


ATCFDVT 


0116 


0074 


ATCOCCOB 


0584 


0248 


ATCBPDA 


0128 


0080 


ATCFEPT 


0120 


0078 


ATCOCHA 


0056 


0038 


ATCCACBA 


0928 


03A0 


ATCFESS 


0412 


019C 


ATCOCRT 


0300 


012C 


ATCCCLAD 


0576 


0240 


ATCFIRA 


0200 


00C8 


ATCONFIG 


0432 


OIBO 


ATCCDADD 


0276 


0114 


ATCFLAGS 


1093 


0445 


ATCPGPAB 


0512 


0200 


ATCCDDEL 


0280 


0118 


ATCFLDA 


1096 


0448 


ATCPODVT 


0784 


*0310 


ATCCDFDN 


0464 


OlDO 


ATCFQE 


0980 


03D4 


ATCPOFLG 


0002 


0002 


ATCCDFIN 


0460 


01 CC 


ATCFRSTR 


0168 


00A8 


ATCPOIA 


0789 


0315 


ATCCDFND 


0284 


one 


ATCFSB 


0088 


0058 


ATCPGPAB 


1136 


0470 


ATCCDLAD 


0580 


0244 


ATCGTSTR 


0164 


00A4 


■ ATCPRTYQ 


0912 


0390 


ATCCDPTR 


0400 


0190 


ATCGVPAG 


1112 


0458 


ATCPTCHA 


0108 


006C 


ATCCFEAD 


0768 


0300 


ATCHALTQ 


0036 


0024 


ATCPTROO 


0736 


02E0 


ATCCIBPL 


0920 


0398 


ATCHBFNO 


0384 


0180 


ATCRCCYO 


0964 


03C4 


ATCCIDM 


0266 


OlOA 


ATCHBSIZ 


0386 


0182 


ATCRCC26 


0248 


00F8 


ATCCOM 


0000 


0000 


ATCHLTMS 


0084 


0054 


ATCRCC63 


0244 


00F4 


ATCCONFT 


0112 


0070 


ATCHPGM 


0384 


0180 


ATCRCC65 


0252 


OOFC 


ATCCRME 


0380 


01 7C 


ATCINBA 


0972 


03CC 


ATCRCFYO 


0964 


03C4 


ATCCSMA 


0296 


0128 


ATCINCW3 


0832 


0340 


ATCRDT 


0012 


OOOC 


ATCCSMR 


0296 


0128 


ATCINDIC 


1092 


0444 


ATCRDTH 


0096 


0060 


ATCDCC3X 


1116 


045C 


ATCIOECB 


0836 


0344 


ATCRDLTK 


0472 


01D8 


ATCDCC60 


0212 


00D4 


ATCIOTRC 


0140 


008C 


ATCREADA 


0160 


OOAO 


ATCDCC61 


0216 


O0D8 


ATCIAHRA 


0960 


03C0 


ATCREMOV 


0136 


0088 


ATCDCFRR 


0008 


0008 


ATCLCLCT 


0774 


0306 


ATCRNCNT 


0772 


0304 


ATCDEBCH 


0388 


0184 


ATCLDECB 


0408 


0198 


ATCRNO 


0788 


0314 


ATCDLRPB 


0544 


0220 


ATCLDNCS 


0404 


0194 


ATCRSVIO 


0704 


02C0 


ATCDOS 


0912 


0390 


ATCMAXID 


0269 


OlOD 


ATCRSVll 


0242 


00F2 


ATCDSPLQ 


0052 


0034 


ATCMDCNL 


0908 


038C 


ATCRSV16 


0270 


OlOE 


ATCDTFBL 


1100 


044C 


ATCMDCNT 


0908 


038C 


ATCRSV70 


0020 


0014 


ATCDVLOD 


0328 


0148 


ATCMDPTR 


0909 


038D 


ATCRSV71 


0092 


005C 


ATCDVT 


0336 


0150 


ATCMNT 


0272 


0110 


ATCRSV97 


0476 


OlDC 



ATCVT (ISTATCVT) (Continued) 



Alphabetical List of F 


ields in 


ISTATCVT (Continued) 


Field 


Dec 




Field 


Dec 


Hex 


Field 


Dec 


Hex 


Hex 


ATCRSV99 


0440 


01B8 


ATCSRT 


0016 


0010 


ATCTIMER 


1104 


0450 ■ 


ATCRTDOS 


1120 


0460 


ATCSRTAB 


0820 


0334 


ATCTIPAB 


0592 


0250 ■ 


ATCRVCHS 


0372 


0174 


ATCSRTAD 


0204 


OOCC 


ATCTODVT 


0392 


0188 ■ 


ATCRVPTD 


1122 


0462 


ATCSRTDF 


0208 


OODO 


ATCTPBUF 


0140 


008C 


ATCR7SVE 


1108 


0454 


ATCSTAT 


0000 


0000 


ATCTRCPT 


0332 


014C 


ATCSAF 


0318 


013E 


ATCSTATA 


0956 


03 BC 


ATaRPAB 


0352 


0160 


ATCSCHRT 


0944 


03B0 


ATCSTATl 


0000 


0000 


ATCUEP 


0304 


0130 


ATCSECST 


0812 


032C 


ATCSTAT2 


0818 


0332 


ATCUSSPT 


0824 


0338 


ATCSECOl 


0792 


0318 


ATCSTAT4 


0003 


0003 


ATCVARYQ 


0044 


002C 


ATCSECIO 


0796 


031C 


ATCSTFLG 


0001 


0001 


ATCVDLOK 


0904 


0388 


ATCSEai 


0800 


0320 


ATCSTMA 


0172 


OOAC 


ATCVDPAB 


0840 


0348 


ATCSEC30 


0804 


0324 


ATCSTXOC 


1168 


0490 


ATCVFPAB 


0872 


0368 


ATCSEC40 


0808 


0328 


ATCSVC33 


1094 


0446 


ATCVLCNT 


0772 


0304 


ATCSEC51 


0812 


032C 


ATCSV53T 


0940 


03AC 


ATCVOCLK 


0468 


01D4 


ATCSHRFG 


0316 


013C 


ATCSYSCN 


0916 


0394 


ATCVPABl 


0480 


01 EO 


ATCSHRTN 


0308 


0134 


ATCS49XI 


0776 


0308 


ATCVPARM 


0068 


0044 


ATCSIPD 


0800 


0320 


ATCS49XL 


0780 


030C 


ATCVTINM 


0696 


02B8 


ATCSMBQ 


0196 


00C4 


ATaACB 


0700 


02 BC 


ATCVTIPB 


0656 


0290 


ATCSMQU 


0184 


00B8 


ATaClPB 


0624 


0270 


ATCVLOD 


0356 


0164 


ATCSMRC 


0192 


OOCO 


ATaCUM 


0692 


02B4 


ATCVTMID 


0240 


OOFO 


ATCSMRQ 


0180 


00 B4 


ATCTCLOM 


0688 


02B0 


ATCXRANG 


0317 


013D 


ATCSMRS 


0188 


OOBC 


ATCTET 


0932 


03A4 


ATCZDVTB 


0364 


016C 


ATCSOPD 


0792 


0318 


ATaETC 


0936 


03A8 








ATCSRPAB 


0968 


03C8 


ATCTHTRC 


0140 


008C 








Flag Meanings 
















Hex Flag Byte 


Contents 


Bit 




Pattern 


Pattern 


Disp 








Pattern 
1 


Name 
ATCSTART 


Meani 
VTAM 


29 


0000 ATCSTATl 


VTAM Status Byte 1 


is starting 










.1.. . 




ATCACTIV 


VTAM 


is active 










..1. . 




ATCSNHLT 


VTAM 


session halt 










...1 . 




ATCQKHLT 


VTAM 


quick halt 










.... 1 




ATCNETSL 


NETSOL=Yes 
specified on CMD 












1.. 


ATCINHLT 


Internal VTAM 
Halt Quick 












.1. 


ATCMDHLT 


VTAM CMD proc 
















halted 














..1 


(a)NM00011 


Reserved 



ATCVT (ISTATCVT) (Continued) 



Flag Meanings (Cent 


nued) 








Hex 
Disp 


Flag Byte 


Contents 


Bit 
Pattern 


Pattern 
Nome 


Pattern 
Meaning 


0001 


ATCSTFLG 


Storage Management 
Flags 


1 


ATCHSDMF 


System slow down 
flag 


0002 


ATCPOELG 


Program Operator 
Interface Flags 


1 

.111 nil 


ATCPOUNS 
@ NM00012 


Application 
authorized to 
receive unsolicited 
messages, 1=YES 
Reserved 


0003 


ATCSTAT4 


VTAM status byte 4 


1 

.1 


ATCPRTAT 
ATCTPRT 


1= Trace Print 

active, = not 

active 

When 1, TPRINT 








..1 

...1 .... 
.... 1... 
Ill 


ATCMTST 
ATCNCSD 
ATCVTTRC 
ATCRSV04 


m process 
When 1, Modify 
Test in process 
NCS quiesced 
during halt 
VTAM Trace, 
1 = active 
Reserved 


013C 


ATCSHRFG 


Attribute Flags 


1 


ATCLAST 


Indicate this is 
last module 


0332 


ATCSTAT2 


Trace Flags 


1 

.1 

..1 

.... \'.'.'. 
Ill 


ATCTRAPI 
ATCTRESC 
ATCTRPSS 
ATCTRLOK 
ATCTRSMS 
(cbNMOOOM 


API 

ESC 

PSS 

LOCKS 

SMS 

Reserved 


0445 


ATCFl^GS 


Flag Byte 


1 

.1 

..11 nil 


ATCSTOPF 

ATCRNLUB 
ATCRSV02 


Halt msg Recepit 

Flag 

LUB is unassigned 

Reserved 



AVT 


(ISTAVT 
Hex 

4 
8 

c 

10 
14 
18 
1C 
20 
24 

28 

OR 
4 










Dec 





1 


2 


3 





ISTACVT 

Address of VTAM CVT 


4 


ISTAS49 
Address of SVC 49 Code 


8 


1STAS53 
Address of SVC 53 code 


12 


ISTAPSTA 
Address of APS table 


16 


ISTTXTSZ 
Not used 


iSTVTTIK 
VTAMRP Task ID 


20 


ISTAPSEX 
Address of APS exit 


24 




ISTPHNM 
Phase name of transient 


28 




ISTXl 
Test field 


ISTARID 
Address of RID 


32 


ISTATRT 
Address of VTAM gates in RETAB 


ISTAGTWT 
Address of GATEWAIT routine 


36 


ISTVTTP 
Address of code to check for 
pending timer interrupt 


ISTPDAVP 
Vector for PDAIDS SMS trace 


40 


ISTPDAVP (Cont) 






G iSTA49 






4 


First Byte of 
ISTAS49 





I 



AVT(ISTAVT) (Continued) 
Alphabeficol List of Fields in ISTAVT 



Field 

ISTACVT 
ISTAGTWT 
ISTA P SEX 
ISTAPSTA 
ISTARID 



Dec Hex Field 



Dec Hex Field 



0000 0000 ISTAS49 

0034 0022 ISTAS53 

0020 0014 ISTATRT 

0012 OOOC ISTPDAVP 

0030 00 IE ISTPHNM 



Dec Hex 



0004 0004 ISTTXTSZ 0016 0010 

0008 0008 ISTVTTIK 0018 0012 

0032 0020 ISTVTTP 0036 0024 

0038 0026 ISTXl 0029 00 ID 

0024 0018 



Flag Meanings 



Hex Contents 
Disp 



Pattern 
Name 



Pattern 
Meaning 



0004 First byte of IS TAS49 1. 



Halt in progress 



BPDIR (ISTBPDIR - BUFFER POOL DIRECTORY) 



Dec Hex 




16 10 

20 14 

24 18 

28 IC 

32 20 

36 24 

40 28 

44 2C 

48 30 



BPDIDSFA 
Buffer Pool ID for SFA 



BPDIRSFA 
A (Small Fixed Pool) 



BPDIDLFA 
Buffer Pool ID for Lf A 



BPDIRLFA 
A (Large Fixed Pool) 



BPDIDSPA 
Buffer Pool ID for SPA 



BPDIRSPA 
A (Small Pageable Pool) 



BPDIDLPA 
Buffer Pool ID for LPA 



BPDIRLPA 
A (Large Pageable Pool) 



BPDIDAPA 
Buffer Pool ID for ACE/ ICE 



BPDIRAPA 
Addr. ACE/ICE Pool 



BPDIDWPA 
Buffer Pool ID for WS FMCB 



BPDIRWPA 
Addr. WS FMCB Pool 



BPDIDPPA 
Buffer Pool ID for PD 



11-41 



BPDIR (ISTBPDIR - BUFFER POOL DIRECTORY) (Continued) 





Hex 
34 












— 






Dec 





1 


2 


3 




52 






BPDIRP 


PA 










38 






Addr PageabI 


e Data Buf Pool 








56 






BPDID^ 


4PA 










3C 






Buffer Pool ID for NW FMCB 








60 






BPDIRN 


PA 










40 






Addr Non-Wc 


rking 


Set FMCB Buffer Pool 






64 






BPDIRV 


FA 










44 






A (Variable Buffer Length Fixed Pool) 






68 






BPDIRV 


PA 










48 






A (Variable B 


uffer Length Pageable Pool) 






72 






BPDIDL 


JPA 










4C 






Buffer Pool IC 


-UECBS 








76 






BPDIRU 


PA 










betical L 






Address UECE 


Buffe 


Pool 








Alpha 


ist of F 


•elds in 


STBPDIR 










Field 




Dec 


Hex 


Field 


Dec 


Hex 


Field 


Dec 


Hex 


BPDIDAPA 


0032 


0020 


BPDIDUPA 


0072 


0048 


BPDIRSFA 


0004 


0004 


BPDIDlfA 


0008 


0008 


BPDIDWPA 


0040 


0028 


BPDIRSPA 


0020 


0014 


BPDIDLPA 


0024 


0018 


BPDIRAPA 


0036 


0024 


BPDIRUPA 


0076 


004C 


BPDIDNPA 


0056 


0038 


BPDIRLFA 


0012 


OOOC 


BPDIRVFA 


0064 


0040 


BPDIDPPA 


0048 


0030 


BPDIRLPA 


0028 


OOIC 


BPDIRVPA 


0068 


0044 


BPDIDSFA 


0000 


0000 


BPDIRNPA 


0060 


003C 


BPDIRWPA 


0044 


002C 


BPDIDSPA 


0016 


0010 


BPDIRPPA 


0052 


0034 








Displacement I 


ist of F 


ields in 


ISTBPDIR 












Dec 


Hex 


Field 




Dec Hex 


Field 




Dec Hex 


Field 





0000 0000 BPDIDSFA 

0004 0004 BPDIRSFA 

0008 0008 BPDIDLPA 

0012 OOOC BPDIRLFA 

0016 0010 BPDIDSPA 

0020 0014 BPDIRSPA 

0024 0018 BPDIDLPA 



0028 OOIC BPDIRLPA 

0032 0020 BPDIDAPA 

0036 0024 BPDIRAPA 

0040 0028 BPDIDWPA 

0044 002C BPDIRWPA 

0048 0030 

0052 0034 



0056 0038 BPDIDNPA 
0060 003C BPDIRNPA 



BPDIDPPA 
BPDIRPPA 



0064 0040 
0068 0044 
0072 0048 



BPDIRVFA 
BPDIRVPA 
BPDIUPA 



0076 004C BPDIRUPA 



BTU (ISTBTU) 



Dec 


Hex 

8 
C 

14 





1 


2 


3 




BTUFOTHA 

1st and 2nd bytes 








BTUBTH 
BTH fie 


ds 


8 


BDUCOUNT 
Count of data in RU 


BTUFORHA 
Three RH bytes 


12 


BTUFORHA (Cont) 


BTUBDU 
BDU fields 






20 




RTI ITFY 


T 







L 



Start of text (Variable length) 



T 



ORG BTUFOTHA 



BTUFOTHB 



BTUDEST 
Destination name 



ORG BTUBTH+2 



BTUSORCE 
Source name 



ORG BTUSORCE 



BTUXDAF 
Inbound source = FSB DAF 



ORG BTUBTH44 



BTUXSAF 
Inbound dest = FSB DAF 



BTUREQ 
Request TAG 



ORG BTUREQ+1 



BTUROFLG 
Flag byte 



Request sequence 



BTU(ISTBTU) (...Continued) 



























Dec Hec 





1 


2 


3 




ORC 
10 A 


7 BTUFORHA 


















BTUFORHB 




12 C 


BTUFHORB 
(Cont.) 














Alphabetical L" 


stofF 


ields in 


jST 


BTU 




Field Dec 


Hex 

0008 
OOOD 
0002 
0002 
OOOA 
OOOA 


Field 


Dec 

0000 
0000 
0006 
0006 
0007 
0004 


Hex 

0000 
0000 
0006 
0006 
0007 
0004 


Field 


Dec Hex 


BDUCOUNT 0008 
BTUBDU 0013 
BTUBTH 0002 
BTUDEST 0002 
BTUFORHA 0010 
BTUFORHB 0010 


BTUFOTHA 

BTUFOTHB 

BTUREQ 

BTURQFLG 

BTUSEQ 

BTUSORCE 


BTUTEXT 
BTUXDAF 
BTUXSAF 


0020 0014 
0004 0004 
0002 0002 


Flag Meanings 














Hex Flag Byte 
Dec 


Contents 


Bit 
Pattern 


Pattern 
Name 


Pattern 
Meaning 


0000 

0006 BTURQFLG 


First byte of 
BTUFOTHB 
Flag Byte 


nil . 

1... . 
.1.. . 




BTUFID 

BTURFIND 

BTUACIND 


Format ID 

Request Feedback 
Indicator 
Additional 
Command Indicator 








..1, . 
...1 . 
.... 1 


1.. 
.1. 


BTUFFIND 

BTULBIND 

BTUNONCB 

BTUINPET 
BTUASBTU 


Functional Flag 

Generated 

Last Block 

Indicator 

No NCB for this 

Request 

Invite Perpetual 

Associate BTU to 
















..] 


BTUDTRCE 


come 

Device Trace 
Requested 



BTU (ISTBTU) (...Continued) 

Constants in ISTBTU 

Label Value Meaning 



BTUMDR 


X'OA' 


BTUTHCON 


X'OEOO' 


BTURHCON 


X '039000- 


BTUODFC 


10 



MDR Id'fier in SYS Resp. byte 

FIDOTH 

FIDO RH 

Difference between BDU and TH Count Fids 



CCB (ISTCCB) 






1 


2 


3 


CCBCNT 
Residual Count 


CCBCOMl 
First 

Communication 
byte 


CCBCOM2 
Second 

Communication 
byte 


CCBSTA 
CSW status 


CCBCLS 
CCB class 


CCBPUBNO 
Pub no in table 


CCBCCW 
CCW address 


CCBCOM3 
Third 

Communication 
byte 


CCBCHAP 
Address of Channel Appendage • 



ORG CCBCCW 



CCBLIOCS 
LIOCS flags 



CCBCPAD 
Real Address of CCW 



Alphabetical List of Fields in ISTCCB 
Field Dec Hex Field 



Dec Hex Field 



CCBCCW 0008 0008 CCBCOMl 

CCBCHAP 0013 OOOD CCBCOM2 

CCBCLS 0006 0006 CCBCOM3 

CCBCNT 0000 0000 CCBCPAD 



Dec Hex 



0002 0002 CCBLIOCS 0008 0008 

0003 0003 CCBPUBNO 0007 0007 
0012 OOOC CCBSTA 0004 0004 
0009 0009 



Flag Meanings 










Hex Flag Byte 
Disp 


Contents 


Bit 
Pattern 


Pattern 
Name 


Pattern 
Meaning 


0002 CCBCCMl 


First Commu 
Byte 


nication 1 

.1 

.J 


CCBTRABT 
(aNM00009 
CCBDISER 


CCB Traffic bit 
Reserved 
CCB Disaster 
bit area 


0006 CCBCLS 


CCB Class 


1 


CCBREAL 


Real CCB 



111 nil @NM00010 Reserved 



COMRG (ISTCOMRG) 



Dec Hex 




32 20 

36 24 

40 28 

44 2C 



COMDATE 
Job date 



COMPPBEG 
End of supervisor 



COMEOSSP 
End of storage protectic 



COMSCRAT 
User scratch area 



COMUPSI 
UPS I byte 



COMNAME 
Job name 



COMPPEND 
Address of last byte of PP area 



COMHIPHS 
Address of last fetch or load 



COMHIPRG 
Address of longest PP phase 



COMLABLN 
Length of PP label area 



COMPID 
Program interrupt key 



COMEOCA 
Address of end of core 



COMCONFG 

Machine 
configuration 



COAAJCSWl 
Job control 
switch 1 



COMLTAa 

Configuration 

options 



COMLCTL 
Linkage control 
byte 



COMDALC 
Disk address of label cylinder 



COMSOBl 
Standard option 
byte 1 



CONJCSW3 
Job control 
switch 3 



COMSOB2 

Standard option 

byte 2 



CONJCSW4 
Job control 
switch 4 



COM=OCL 
Address of FOCL 



COMPUBPT 
Address of PUB table 



COMFAVP 
Address of FAVP 



COMRG (ISTCOMRG) (continued) 



Dec Hex 
68 44 



92 


50 


96 


60 


100 


64 


104 


68 


108 


6C 


112 


70 


116 


74 


120 


78 






1 


2 


3 


COMJIBPT 
Address of JIB table 


COMTEBPT 
Null TEB address 


COMFICL 
Address of FICL 


COMNICL 
Address of NICL 


COMLUBPT 
Address of LUB table 


COA^YSLN 
System line count 




COMSYSDT 
System date 




COMLIOCS 
LIOCS communication bytes 


COMPIBPT 
Address of PIB table 


COMCHKID 
Last check point number 


COMLTHID 
Length of LUB ID queue 


COMDIBPT 
Address of background DIB 


COMERBL 
Address of transient CONREG 


COMPCPTR 
Address of PC option table 


COMITPTR 
Address of IT option table 


COMOCPTR ' 
Address of OC option table 


COMPWTIM 
Key of PGM with IT support 


COMLUBID 
Address of LUB ID queue 


COMLTK 
Logical transient key 


COMSYSPM 
SYSPARM field 


COMJAPT 
Address of job accounting table 


COMSYSCM 
Address of SYSCOM 


COMPIB2 
Address of PIB extension 


COAAMICR 
Address of MICR DTP 


<S)NM0QOO3 
Reserved 


COMBGCOM 1 COMOPTN 
Address of background COMREG Option 

1 indicator byte 


(S)NM00005 
Reserved 



COMRG (ISTCOMRG) (Continued) 























Dec Hex 


° 


1 


2 


3 




136 88 








COMEXT 














Address 


of COMREG extension 






140 8C 








(aNM00006 
Reserved 








144 90 








@NM00007 
Reserved 








ORG 


COMSYSDT 
















79 4F 




COMMDD 




80 50 






COMMDD (CONT) 
















MMDD 


or DDMM part 


















COMYYDDD 
















YYDDD part 








Alphabetical Lis 


tof F 


ields in 


ISTCOMRG 












Field [ 


)ec 
128 


Hex 
0080 


Field 


Dec Hex 
0036 0024 


Field 


NICL 


Dec 
0074 


Hex 


(aNM00003 C 


COMHIPHS 


COM 


004A 


@NM00005 C 


135 


0087 


COMHIPRG 


0040 0028 


COMOCPTR 


0104 


0068 


@NM00006 C 


140 


008C 


COMITPTR 


0102 0066 


COMOPTN 


0134 


0086 


§iNM00007 C 


144 


0090 


COMJAPT 


0116 0074 


COMPCPTR 


0100 


0064 


COMBGCOM C 


132 


0084 


COMJCSWl 


0056 0038 


COMPIBPT 


0090 


005A 


COMCHKID C 


092 


005C 


COMJIBPT 


0068 0044 


COMPIB2 


0124 


007C 


COMCONFG C 


052 


0034 


COMLABLN 


0044 002 C 


COMPID 


0046 


002B 


COMDALC C 


060 


003C 


COMLaL 


0057 0039 


COMPPBEG 


0008 


0008 


COMDATE C 


1000 


0000 


COMLIOCS 


0088 0058 


COMPPEND 


0032 


0020 


COMDIBPT C 


096 


0060 


COMLTACT 


0053 0035 


COMPUBPT 


0064 


0040 


COMEOCA C 


048 


0030 


COMLTHID 


0094 005E 


COMPWTIM 


0106 


006A 


COMEOSSP C 


1010 


OOOA 


COMLTK 


0110 006E 


COMSCRAT 


0012 


OOOC 


COMERBL C 


098 


0062 


COMLUBID 


0108 006C 


COMSOBl 


0054 


0036 


CO MEXT C 


136 


0088 


COMLUBPT 


0076 004C 


COMSOB2 


0055 


0037 


COMFAVP C 


066 


0042 


COMMDD 


0079 004F 


COMSYSCM 


0120 


0078 


COMFICL C 


072 


0048 


COMMICR 


0126 007E 


COMSYSDT 


0079 


004F 


COMFOCL 


062 


003E 


COMNAME 


0024 0018 


COM 


SYSLN 


0078 


004E 



COMRG (ISTCOMRG) (ConMnued) 

Alphabetical List of Fields in ISTCOMRG (Continued) 

Field Dec Hex Field Dec Hex Field 

COMSYSPM 0112 0070 COMUPSI 0023 0017 CONJCSW3 
COMTEBPT 0070 0046 COMYYDDD 0083 0053 CONJCSW4 



0058 003A 

0059 003B 



Flag Meanings 



Hex 
Disp 


Flag Byte 


Contents 


Bit 
Pattern 


Pattern 
Name 


Pattern 
Meaning 


0035 


COMLTACT 


Configuration 
Options 


nil 11.. 

1. 

1 


@NM00001 
CCMASYNC 

@NM00002 


Reserved 
Asynchronous 
processing in 
operation 
Reserved 


0086 


COMOPTN 


Option Indicator 
Byte 


nil 111. 
1 


(aNM00004 
CCMANCHT 


Reserved 
Partition Anchor 
Table exists. 



CONFT (ISTCONFT) 



40 28 

44 2C 

48 30 

52 34 

56 38 

60 3C 

64 40 



CONCONFG 
Name of configuration table 



CONAPINM 
API Module name 



CONAPSNM 
APS Module name 



CONDMNM 
Device Management Control Layer Module Name 



CONFBPNM 
Feedback processing routine module name 



CONACB 
Pointer to VTAM ACB 



CONCIBAD 
Pointer to command input buffer 



CONDISIA 
Display command parameter list address 



CONNCSLA 
NCS parameter list address 



CONHLTLA 
Halt command parameter list address 



CONMODLA 
Modify command parameter list address 



CONVARLA 
Vary command parameter list address 



CONENDIA 
The last command processed parameter list address 



CONFT (ISTCONFT) (...Continued) 





Hex 

48 

4C 

50 

54 

58 

5C 

60 

64 

68 

6C 
70 

74 
80 
8C 












Dec 





1 


2 


3 


72 


CONSTCIB 
Start command CIB address 


76 


CONRDBUF 
Buffer address used by read routine 


80 


CONLDPRM 
Pointer to ISTLDPRM 


84 


CONDCBOA 
Address of VTAMLIBDCB 


88 


CONDCBLA 
Address of VTAMLIBDCB 


92 


CONDCBBA 
Address of VTAMLIBDCB 


96 


CONTPNCS 
Pointer to TPRINT 


100 


CONBUFSZ 
Size of buffer used by read 
routine 


CONCID 
Operator terminal CID 


104 


CONRES2 
Reserved 


CON LAST 
Last command 
code 


CON HALT 
Halt flags 


CON VARY 
Vary code 


108 


CONDISPL 
Display code 


CONMODFY 
Modify code 






112 






CONFLAGS 
Flags 




CON RS VI 7 
Reserved for 
alignment 


116 


CONSFSBF 
Small fixed list 


128 


CONSPSBF 
Small pageable list 


40 


CONLFSBF 
Large fixed list 



CONFT (ISTCONFT) (...Continued) 



CONLPSBF 
Large pageable list 



CONVFSBF 
Variable length fixed list 



CONVPSBF 
Variable length oageable 



CONIOSBF 
I/O Fixed list 



CONWPSBF 
Working Set Pool list 



CONAPSBF 
ACE/I a pool list 



CONNPSBF 
Non-working set list 



CONPPSBF 
Pageable data pool list 



CONCRPLS 
CRPLpool list 



CONSFDBF 
Small fixed list 



CONFT (ISTCONFT) (...Continued) 



CONSPDBF 
Small pageable lisf 



CONLFDBF 
Large fixed list 



CONLPDBF 
Large pageable list 



CONVFDBF 
Variable-length fixed list 



CONVPDBF 
Variable-length pageable 



CONUEDBF 
UECB list 



CONIODBF 
I/O fixed list 



CONWPDBF 
Working set pool list 



CONAPDBF 
ACE/ICE pool list 



CONNPDBF 
Non-working set pool list 



CONFT (I5TCONFT) (...Continued) 



416 lAO 
420 1A4 



CONFLGOl 
Init/term flags 



1036 40 C 



CONPPDBF 
Pageable data pool list 



CONCRPLD 
CRPLpool list 



CONRSVOl 
Reserved - for Alignment 



CONVTHDR 
VTAM RDT header 



CONVVTAM 
Application entry for VTAM 



CONTOLTP 
Application entry for TOLTEP 



CONTRACE 
Application entry for TRACE 



CONNTSOL 
Application entry for NETSOL 



CON RE CON 
Application entry for RECOVERY 



CONECDET 
ECB to be posted upon subtask completion 



CONFT (ISTCONFT) (...Continued) 



Dec Hex 
1160 488 
1164 48C 



CONSTAFP 
Footprint for non-PSS state rtn. for VTAM task 



CON LIST 
Two character storage area for 
the 'List=ID' operand on a start 
command. Set and referenced 
by the Conf CTL module of * 



CONRSV50 
Reserved preserve alignment 



CONCSCB 
Pointer for CSCB 



CONFNSAT 
Attach parameter list for Network solicitor 



CONFTRAT 
Attach parameter list for trace 



CONFLDAT 
Attach parameter list for load/dump 



CONFXXAT 
Attach parameter list for SYS def . 



CONFTTAT 
Attach parameter list for TOLTEP 





- 


CONRSV24 
RESERVED 


1340 53C 


CONGLBBH 


CONRVPTl 
Reserved 


CON UN ITS 
RN Host Buffersize, LBUF DOS/VS 
IQBUF in V/S 1,2 


1344 540 


CONSDECB 
ECB used to post ISTSDCLM to run SYS def lO code 


1348 544 


CONSDMLC 
Ptr to SYS def parameter list ISTMLCA 



' INITIALIZATION (ISTINCCC) 



CONFT (ISTCONFT) ( Continued) 















Dec 


Hex 

548 

54C 
550 

55C 





1 


2 


3 


1352 


CONFOISV 
Host attach save area ptr 


1356 


CONSCPID 
SSCPID 


1360 




CONUESBF 
UECB list 




1372 










ORC 


5 CONFLAGS 








110 


6E 

ORGCONFL^GS+1 
6F 




CONDSFLG 
Data set flags : 












111 




CONOPTFL 
Optional 
services flags: 



I 



ORG CONFLAGS+2 



112 


70 


CONSTAT 
Resource status 
flags : 






ORC 


3 CONFLAGS+3 




113 


71 

ORG CON BUFF 
71 

ORG CONBUFF+1 
72 


CON BUFF 
Buffer status flags 








113 


First Byte of 
CON BUFF 










114 




Second Byte of 
CON BUFF 



CONFT (ISTCONFT) (ConHnued) 













Dec 


Hex 





1 


2 


3 




ORG CONSCPID 






1356 


54C 
550 


CONFCNL 
Function level 


CONFILL 
Filler 


CONBLKNO 
Block Number 


CONSTFIL* 


1360 


CONSTVAR* 
Variable Portion of ID 







* CONSTFIL is a 4-bit field that is a station ID Filler. CONSTFIL 
and CONSTVAR together make up the field CONSTAID, which is a 
20-bit station ID. 



I Alphabetical List of Fields in ISTCONFT 



Field 


Dec 


Hex 


Field 


Dec 


Hex 


Field 


Dec 


Hex 


CONACB 


0040 


0028 


CONFTTAT 


1284 


0504 


CONRVPTl 


1341 


053D 


CONAPDBF 


0368 


0170 


CONFXXAT 


1256 


04E8 


CONSCPID 


1356 


054C 


CONAPINM 


0008 


0008 


CONFOISV 


1352 


0548 


CONSDECB 


1344 


0540 


CON APS BF 


0212 


00D4 


CONGLBBH 


1340 


053C 


CONSDMLC 


1348 


0544 


CONAPSMN 


0016 


0010 


CON HALT 


0106 


006A 


CONSFDBF 


0260 


0104 


CONBLKNO 


1358 


054E 


CONHLTLA 


0056 


0038 


CONSFSBF 


0116 


0074 


CON BUFF 


0113 


0071 


CONIODBF 


0344 


0158 


CONSPDBF 


0272 


0110 


CONBUFSZ 


0100 


0064 


CONIOSBF 


0188 


00 BC 


CONSPSBF 


0128 


0080 


CONCIBAD 


0044 


002C 


CON LAST 


0105 


0069 


CONSTAFP 


1160 


0488 


CONCID 


0102 


0066 


CONLDPRM 


0080 


0050 


CONSTAID 


1360 


0550 


CONCONFG 


0000 


0000 


CONLFDBF 


0284 


one 


CONSTAT 


0112 


0070 


CONCRPLD 


0404 


0194 


CONLFSBF 


0140 


008C 


CONSTCIB 


0072 


0048 


CONCRPLS 


0248 


00F8 


CONLIST 


1164 


048C 


CONSTVAR 


1360 


0550 


CONCSCB 


1168 


0490 


CONLPDBF 


0296 


0128 


CONTOLTP 


0676 


02A4 


CONDCBBA 


0092 


005C 


CON LPS BF 


0152 


0098 


CONTPNCS 


0096 


0060 


CONDCBLA 


0088 


0058 


CONMODFY 


0109 


006D 


CONTRACE 


07?6 


031C 


CONDCBOA 


0084 


0054 


CONMODLA 


0060 


003C 


CONUEDBF 


0332 


014C 


CONDISLA 


0048 


0030 


CONNCSLA 


0052 


0034 


CONUESBF 


1362 


0552 


CONDISPL 


0108 


006C 


CONNPDBF 


0380 


017C 


CONUNITS 


1342 


053E 


CONDMNM 


0024 


0018 


CONNPSBF 


0224 


OOEO 


CONVARLA 


0064 


0040 


CONDSFLG 


0110 


006E 


CONNTSOL 


0916 


0394 


CON VARY 


0107 


006B 


CON BCD ET 


1156 


0484 


CONOPTFL 


0111 


006F 


CON VF DBF 


0308 


0134 


CONENDLA 


0068 


0044 


CONPPDBF 


0392 


0188 


CONVFSBF 


0164 


00A4 


CONFBPNM 


0032 


0020 


CONPPSBF 


0236 


00 EC 


CONVPDBF 


0320 


0140 


CONFCNL 


1356 


054C 


CONRDBUF 


0076 


•004C 


CONVPSBF 


0176 


OOBO 


CONFILL 


1357 


054D 


CONRECON 


1036 


040C 


CONVTHDR 


0420 


01A4 


CONFLAGS 


0110 


006E 


CONRES2 


0104 


0068 


CONWTAM 


0556 


022C 


CONFLDAT 


1228 


04CC 


CONRSVOl 


0417 


«1A1 


CONWPDBF 


0356 


0164 


CONFLGOl 


0416 


OlAO 


CONRSV17 


0115 


0073 


CONWPSBF 


0200 


00C8 


CONFNSAT 


1172 


0494 


CONRSV24 


1312 


0520 








CONFTRAT 


1200 


04 BO 


CONRSV50 


1166 


048 E 









CONFT (ISTCONFT) (Continued) 
Flag Meanings 



Hex Flag Byte Contents 
Disp 



006A CON HALT Halt Flags 
006E CONDSFLG DataSet Flags 



006F CONOPTFL Option Services 
Flags 



0070 CONSTAT Resource Status 

Flags 



Pattern 



Pattern 
Name 



Pattern 
Meaning 



1 CONHLTQ Quickflag 

-1 CONHLTS Session flag 

1 (aJNM00003 Reserved 

.1 @NM00004 Reserved 

..1 (aNMOOOOS Reserved 

...1.... CONSYOBJ SYSl. VTAMOBj 





is open 


.... 1... CONSYLIB 


SYSl. VTAMLIB 




is open 


1.. CONSYL5T 


SYSl. VTAMLST 




is open 


1 CONWRMST 


Warm specified on 




VTAM start command 




1=YES 


.1 @NM0007 


Reserved 


..1 @NM0008 


Reserved 


... 1 ... . @ NM0009 


Reserved 


.... 1... CONBUFTR 


Buffer Trace 




Requested 


1.. CONBTUTR 


BTU Trace 




Requested 


1. CONMODTR 


Module Trace 




Requested 


1 CONIOTR 


I/O Trace 




Requested 


1 @NM00010 


Reserved 


.1 @NM00011 


Reserved 


..1 @NM00012 


Reserved 


...1 .... CONSTOR 


VTAM has Storage 


.... 1... CONDSOPN 


Data Sets open 


1.. CONLODED 


VTAM routines 



loaded 
CONVRYIN Network varied in 
CONACTV Operator active 



First byte of !•• 


CONSFEX 


Small fixed 


CON BUFF 




pool exists 


.1. 


CONSPEX 


Small paged 
pool exists 


..1 


CONLFEX 


Large fixed 
pool exists 




1 .... CONLPEX 


Large paged 
pool exists 




. 1... CONVFEX 


Variable fixed 
bfr pool (DOS) 
exists 




. .1.. CONVPEX 


Variable pg bfr 
pool (DOS) 
exists 



CONFT (ISTCONFT) (ConMnued) 



Flag Meanings (Gantinued) 



0071 
(Continued) 



First byte of 
CON BUFF 
(Continued) 



Second byte of 
CON BUFF 



OIAO CONFLGOl INITAERM flags 



CONUECB UECB pool exists 
(VSl &VS2) 

CONIOEX I/O fixed pool 
exists 



CONWPEX 



CONCRPL 

CONFTSTM 

CONFTTMR 

CONFTEXS 

CONFTNAC 

CONFTNSA 

CONFTTA 
CONFTPSA 

.1 CONNSNEC 



Working set pool 
exists 

AC^ICE pool 
exists 

Nop -working set 
pool exists 
Pageable data 
pool exists 
CRPL pool exists 

Bit to indicate 

Set Timer 

Bit to indicate 

Timer is running 

Exits scheduled 

flag 

No active 

connections flag 

Bit to indicate 

Network Solicitor 

active 

To indicate TOLTEP 

active 

Bit to indicate 

Port Solicitor 

active 

Indicate Network 

Solicitor is 

necessary 



DEVCH (ISTDEVCH) 






• 


2 


3 


DEVSHCH 

Dev.Sched. 


DEVTCODE 

Device fype 
Codes 


DEVMCODE 
Device model 
Code 


DEVFIAGS 
Use depends 
on DEVSHCH 
values 


DEVPHYSA 
Physical 
Device 
Address 


DEVRSV03 
Reserved 



ORG DEVSHCH 



DEVCHAR 
Compatibility 
Existing Code 



ORG DEVTCODE 



DEVCHAR2 
Compatibility 
Existing Code 



Alphabetical List of Fields in ISTDEVCH 
Field Dec Hex Field 



DEVCHAR 0000 0000 DEVMCODE 

DEVCHAR2 0001 0001 DEVPHYSA 
DEVFLAGS 0003 0003 DEVRSV03 



0002 0002 DEVSHCH 0000 0000 

0004 0004 DEVTCODE 0001 0001 

0005 0005 



Flag Meanings 



Hex Flag Byte Contents 
Disp 



0000 DEVCHAR Compatibility 

Existing Code 



Pattern 


Pattern 


Name 


Meaning 


DEVINPUT 


Device is for 




Input 


DEVOTPUT 


Device is for 




Output 


DEVCONVR 


Device is 




Conversation RN 




definition 


DEVSUBND 


Device has 




schedulable Sub- 




Node 


DEVSPS 


DEV is Start Print 




sensitive 



DEVCH (ISTDEVCH) (Continued) 



Flag Meanings (Cont 


•nued) 








Hex Flog Byte 


Contents 


Bit 


Pattern 


Pattern 


Disp 




Pattern 
1.. 


Name 
DEVNNSPT 


Meaning 


0000 DEVCHAR 




Node has Netwrk 


(Cont) (Continued) 




1. 

1 


DEVCCTL 
DEVRSVOl 


AAngmnt Sprt. 
Node has Conn. 
Cntrl Dependcs 
Reserved 


0003 DEVFLAGS 


Use depends on 
DEVSHCH values 


nil .... 
1 

.1 

..1 

...1 .... 


DEVFCaL 
DEVCBSC 

DEVCSSL 

DEVCRVB 
DEVCSWL 


Used if Device 
req. conn. Ctrl 
Reset orderly, 
Bi-Synch terminals 
except 3270 's 
Reset at end of 
command. 3270 's 
and Start/Stop 
Except terms with 
Reverse Break feature. 
Reset immediate. 
Start/Stop terms 
with Reverse Break 
feature 

l=Higher Node is 
switch connection, 
0=Leased connection 






.... nil 
.... 1... 

1.. 

1. 

1 


DEVCHAR3 
DEVCATTN 

DEVCCHEK 
DEVCSTCL 
DEVCSLPN 


Compatibility 

existing code 

Terminal can 

interrupt with 

attention 

Terminal has 

checking 

Terminal has Station 

Control 

Terminal has 

Selector Pen 



Constants in ISTDEVCH 



Label 


Value 


Meaning 


DEV2740 


x'or 


Device 


s a 2740 


DEV2741 


X'02' 


Device 


s a 2741 


DEV1050 


X'03' 


Device 


s a 1050 


DEVTWX 


X'04' 


Device 


s aTWX 


DEVWTTY 


X'05' 


Device 


s a WTTY 


DEV115A 


X'06' 


Device 


s a USA 


DEV83B3 


X'07' 


Device 


s an 83B3 


DEV2715 


X'08' 


Device 


s a 2715 


DEV2770 


XW 


Device 


s a 2770 


DEV2780 


X'OA' 


Device 


s a 2780 


DEV3735 


X'OB' 


Device 


s a 3735 



DEVCH fISTDEVCH) ^Continued) 



Constants in 


ISTDEVCH 






Label 


Value 


Meaning 


DEV3780 


X'OC 


Device 


s a 3780 


DEV1130 


X'OD' 


Device 


son 1130 


DEVI 800 


X'OE- 


Device 


s an 1800 


DEV3125 


X'll- 


Device 


3 3125 


DEV3135 


X'12' 


Device 


s a 3135 


DEVSYS3 


X'13' 


Device 


5 SYS 3 


DEV2701 


X'14' 


Device 


s a 2701 


DEV2703 


X'15' 


Device 


s a 2703 


DEV3704 


X'16' 


Device 


s a 3704 


DEV3705 


X'17' 


Device 


s a 3705 


DEV2980 


X'lB' 


Device 


s a 2980 


DEV3277 


XM9' 


Device 


sa 3277 


DEV3284 


X'lA' 


Device 


s a 3284 


DEV3286 


X'lB" 


Device 


s a 3286 


DEV3275 


XMC 


Device 


s a 3275 


DEV3741 


X'lD- 


Device 


s a 3741 


DEV3747 


XME' 


Device 


s a 3747 


DEVMTA 


X'28' 


Device 


s an MTA 


DEV2972 


X'33' 


Device 


s a 2972 


DEV3271 


X'34' 


Device 


s a 3271 


DEV3272 


X'36' 


Device 


s a 3272 


DEVCC 


X'35' 


Device 


s a Physical Unit 


DEV1052 


X'64' 


Device 


s a 1052 


DEV1053 


X'65' 


Device 


s a 1053 


DEV1054 


X'66' 


Device 


sa 1054 


DEVI 055 


X'67' 


Device 


s a 1055 


DEVI 056 


X'68' 


Device 


s a 1056 


DEVI 057 


X'69' 


Device 


s a 1057 


DEV1058 


X'6A' 


Device 


s a 1058 


DEV1092 


X'6B' 


Device 


s a 1092 


DEV1093 


X'6C' 


Device 


s a 1093 


DEVLU 


X'6D' 


Device 


s a Logical Unit 


DEV545 


X'78' 


Device 


sa545 


DEV1017 


X'79' 


Device 


sa 1017 


DEV1018 


X'7A' 


Device 


sa 1018 


DEV2203 


X'7B' 


Device 


s a 2203 


DEV2213 


XVC 


Device 


so 2213 


DEV2265 


XVD' 


Device 


s a 2265 


DEV2502 


X'7E' 


Device 


so 2502 


DEV50 


X'7F' 


Device 


sa50 


DEVI 255 


X'80' 


Device 


s a 1255 


DEV5496 


X'Bl' 


Device 


5 5496 


Model Codes 









DEVMODl X'OO' 
DEVM0D2 X'Or 



Model 1 
Model 2 



DNCB (ISTDNCB) 



Dec Hex 







1 


2 


3 


:: DNCNCB 

Common NCB 


DNCBHSET 
Current device 
BHset 


DNCMODE 
Current Device Proc. Options 


: DNCDOS 1 
DOS TPIOS extension "T" 











Or g DNCDOS 



DNCSESIQ 
Head of Envite Session Queue 



DNCSESCQ 
Head of Contact Session Queue 



DNCB (ISTDNCB) ( Continued) 



Dec Hex 
60 3C 



DNCSHEDQ 
Command queue 



DNCRESET 
Reset trap 



Or g DNCRESET 



DNCBUFA 
Trapped buffer queue 



DNCRFLG 
Trap flogs 



Org DNCRESET+5 



DNCIFMCB 
Address of Invitors FMCB 



q DNCDOS+20 






DNCICIP 


DNCLICP 


DNCACIP 


Count of l/P 


Limit of i/P 


Count of all 


commands 


commands 


commands 


currently in 


in process 


currently in 


process 




process 



Org DNCDOS+23 



I 



DNCFLAG 
Flag byte 



DNCLACP 
Limit of all 
commands 
currently in 
process 



Org DNCDOS+25 



DNCSAF 
Current session 



DNCB (ISTDNCB) (Continued) 



Alphabetical list of F 


ields in ISTDNCB 










Field Dec 


Hex Field 


Dec 


Hex 


Field 


Dec Hex 


DNCACIP 0074 


004A DNCIFMCB 


0069 


0045 


DNCRFLG 


0068 0044 


DNCBHSET 0048 


0030 DCNLACP 


0075 


004B 


DCNSAF 


0077 004D 


DN CBUFA 0064 


0040 DCNLICP 


0073 


0049 


DCNSESCQ 


0056 0038 


DNCDOS 0052 


0034 DNCMODE 


0049 


0031 


DCNSESIQ 


0052 0034 


DNCFLAG 0076 


004C DNCNCB 


0000 


0000 


DNCSHEDQ 


0060 003C 


DNCICIP 0072 


0048 DNCRESET 


0064 


0040 






Flog Meanings 












Hex Flag Byte 


Contents 


Bit 




Pattern 


Pattern 


Disp 




Pattern 
1 


Name 
DNCLCLP 


Meaning 


004A DNCACIP 


Cnt of all commands 


Last command in 




currently in process 








LCP process 


004C DNCFLAG 


Flag byte 


1111 . 

1... . 

.1.. . 
..1. . 

.... 1 


1.. 

.1. 
..1 


DNCSTAT 

DNCSESS 

DNCINVIT 
DNCCONT 
DNCDISC 

DNCDHO 

DNCBSC 

DNCRMF 
DNCSLOWQ 


DNCB session 

status 

Resource in 

session 

Invite pending 

Contact pending 

Disconnect 

pending 

Don't honor open 

in progress 

BSC sense status 

to come 

Record mode flag 

Reques.ts queued 

due to slow down 






















condition 


0044 DNCRFLG 


Trap Flags 


1... . 




DNCSYNC 


Synchronization 
flag 














.1.. . 




DNCCRF 


Contact reqrd for 
next command 






..1. . 




DNaFl 


TOLTEPFlag 1 










DNaF2 


TOLTEP Flag 2 






'.'.'.. \ 




DNCRSI 


Reset suppressed 
Invite indicator 








1.. 


DNCDFE 


Disconnected 
feedback expected 
indicator 








.1. 


DNCPSOL 


=1 indicates Dial 
in/port solicitor, 
=0 indicates Dial 
out 








..1 


DNCZF008 


Data purge flag 



DNCB (ISTDNCB) (continued) 



Plags c 


ind AvVjsUs 










Disp. 


Flog 


Contains 


Mask 


Value 


Means B| 


70(46) 


DNCACIP 


CNT of all 
CMNDS currently 
in process 


DNCLCLP 


X'80' 


Last command in LCPHI 


72(48) 


DNCFLAG 


F lag byte 


DNCSTAT 


X'FO' 


DNCB session status 








DNCSESS 


X'80' 


Resource in session 








DNCINVIT 


X'40' 


Invite pending 








DNCCONT 


X'20' 


Contact pending 








DNCDISC 


X'lO- 


Disconnect pending 








DNCDHO 


X'08' 


Don't honor open in 
progress 








DNCBSC 


X'04' 


ESC sense status to come 








DNCRMF 


X'02' 


Record mode flag 








DNCSLOWQ 


x'or 


Requests queued due to 
slow down condition 


64(40) 


DNCRFLG 


Trap flags 


DNCSYNC 


X'80' 


Synchronization flag 








DNCCRF 


X'40' 


Contact reqrd for nxt corr 








DNaFl 


X'20' 


Toltep flag 1 








DNaF2 


X'lO' 


Toltep flog 2 








DNCRSI 


X'08' 


Reset suppressed invite 
indicator 








DNCDFE 


X'04' 


Disconnect feedback 
expecte indicator 








DNCPSOL 


X'02' 


= 1 indicates dial 
in/port solicitor, =0 
indicates 








DNCZF008 


x'or 


Data purge flag 



DTFLT (ISTDTFLT) 



Dec Hex 




DTFFTSD 
Substructure for Seq DTF 



DTFFTDA 
Substructure included with DTFFTSD for DA DTF 



Org DTFFTSD 



Org DTFFTDA 



16 


10 


20 


14 


24 


18 



DTFDEVAD 
Pointer to Device Address 



DTFBLKSI 
Pointer to Block Size 



DTFIOARA 
Pointer to I/O Buffer 



DTFNAME 
Pointer to DTF Name 



DTFSEEKA 
Pointer to Seek Address 



DTFERBYT 
Pointer to Error Byte 



DTFDSKX 
Pointer to Disk Extent Field 



DTFLT (ISTDTFLT (Continued) 
Displacement List of Fields in ISTDTFLT 



Dec Hex Field 



Dec Hex Field 



Dec Hex Field 



0000 0000 DTFDEVAD 
0000 0000 DTFFTSD 
0004 0004 DTFBLKSI 



0008 0008 DTFIOARA 
0012 OOOC DTFNAME 
0016 0010 DTFSEEKA 



0016 0010 DTFFTDA 
0020 0014 DTFERBYT 
0024 0018 DTFDSKX 



Alphabetical List of Fields in ISTDTFLT 
Field Dec Hex Field 



Dec Hex Field 



DTFBLKSI 0004 0004 DTFERBYT 

DTFDEVAD 0000 0000 DTFFTDA 
DTFDSKX 0024 0018 DTFFTSD 



0020 0014 DTFIOARA 0008 0008 
0016 0010 DTFNAME 0012 OOOC 

0000 0000 DTFSEEKA 0016 0010 



Dec Hex 




ORG DVTHDR 



DVTHDR 
Used by ISTOCCRD and Function Release 



DVTENTRY 
Begin entries (Variable length) 



DVTHFORW 
Points to next DVT on Chain 



DVTHECNT | DVTHUCNT 

Number of entries in the DVT Use Count^Number of EPT's 
I referencing the DVT 



DVTHFGA 
Flag field 1 



ORG DVTHDR+9 





DVTHFGB 
Reserved 


DVTHLEN 
Length of DVT (bytes) 


DVTHDCNT 
Count of duplicate DVT's 




DVl 
Rese 


RSV15 
rved 


DVTRSVOl 
Reserved 



DVT (ISTDVT) (Continued) 

AlphabeHcal List of Fields 
Field Dec Hex 



Field 



Dec Hex Field 



Dec He; 



DVTENTRY 0024 0018 DVTHFGA 0008 0008 DVTHUCNT 0006 0006 

DVTHDCNT 0012 OOOC DVTHFGB 0009 0009 DVTRSVOl 0020 0014 

DVTHDR 0000 0000 DVTHFORW 0000 0000 DVTRSV15 0014 OOOE 

DVTHECNT 0004 0004 DVTHLEN 0010 OOOA 



Flag Meonings 



Hex Flag byte Contents 
Disp 



0008 DVTHFGA Flag field 1 



Pattern 


Pattern 


Name 


Meaning 


DVTHFGAO 


Flag byte :X'80'=a 




duplicate DVT has 




been built 


DVTHFGA! 


Delete process 




module for this 




DVT 


DVTRSV02 


Reserved 


DVTRSV03 


Reserved 


DVTRSV04 


Reserved 


DVTRSV05 


Reserved 


DVTRSV06 


Reserved 


DVTRSV07 


Reserved 



DVT (ISTDVTE) 



DVTPROC 
Processor Pointer Field 



ORG DVTPROC 



DVTFLAGl 
DVT Flog byte 



ORG DVTPROC+1 



DVTPROCA 
Processor Pointer 



Alphabetical List of Fields in ISTDVTE 
Field Dec Hex Field 

DVTFLAGl 0000 0000 DVTPROC 



Dec Hex Field Dec Hex 

0000 0000 DVTPROCA 0001 0001 



Flag Meanings 



Hex Flag byte Contents 
Disp 



0000 DVTFLAGl DVT flag byte 



1. .. 

.1 .. 

,.. 1. 

... .1 



Pattern 


Pattern 


Name 


Meaning 


DVTEXITF 


End of DVT 


DVTRSV08 


Reserved 


DVTRSV09 


Reserved 


DVTRSVIO 


Reserved 


DVTRSVl 1 


Reserved 


DVTRSV12 


Reserved 


DVTRSV13 


Reserved 


DVTRSV14 


Reserved 



FMCB (ISTFMCB) 



Dec Hex 




FMaVPE 
Control Type 
Block Code 



1 



FMCLNGTH 
Length in 
Bytes 



FMCSAF 
ID of Source 



FMCNXTCB 
Address of next FMCB In ACDEB 



FMaSKID 
Task Identifier OS - TCB Address, DOS - PIK 



FMCDVTA 
Address of DVT Entry Point Table 



FMCDNCBA 
Address of DNCB for this Node 



FMCFMCBA 
Address of next FMCB for this Node 



FMCUSFLD 
Use Information Field 



FMCSTAT 
Source Status 
Information 



FMCSTATl 

Status 

Information 



(cbNM00002 
Reserved 



FMCCMDFL 
Command F lags 



FMCDEBA 
Address of ADDEB 



FMCRPLH 
Address of Held RPL 



FMCVWT 
RPH Address for Vary Wait 



I 



FMCB (ISTFMCB) (Continued) 



FMCPROCD 
Process Option from NIB 



FMCMODE 
Mode Name from NIB 



FMCFASYA 
DFASYany Q Chain 



FMCPABl 
Control Layer Outbound PAB 



FMCPAB2 
Control Layer Inbound PAB 



FMCPAB3 
Synch with Outbound PAB 



FMCPAB4 
TPIOCS Inbound PAB 



FMCBPAB5 
TPIOCS all but Synch with Outbound PAB 



FMCB (ISTFMCB) (ConHnued) 
Dec Hex 
144 90 






1 


2 


3 


FMCEXLST 
Address of CEXLST 


FMCSIPA 
Address of Session Control Inbound PAB 


FMCNXOSQ 
Next Outbound Sequence nums. 


FMCISSN 
Inbound Sync Sequence Number 


FMCRVDOl 
Reserved 


FMCSSTAT 

Session-CPM 

Status 


FMCPACE 
Pacing Counts 




FMCCLEXT 
Basic Control Layer Extension 




FMCBHSET 
BHSET ID 
Index for 
connected 
Application 


FMCSTAT2 
Purge flags 


FMCLUSTR 
Count of Start 
CTLS Rec 


FMCIPSEQ 
Invite Perpetual 
Count 


FMCMODEB 
Mode Byte 


FMCCLSEQ 
CL Sequence Numbers 


FMCCLSEQ (Cont. 


FMCaLB 
Ctl.Type 
outstanding 


FMCRRESP 
Respond Type 
expected 


FMCPSTRS 
Cnt Outstanding Post=RESP 


FMCRSPLM 
RESPLIM Value 


FMCSSEGQ 
Sync. Flow Segment Queue 



I 



FMCB(ISTFMCB) (Continued) 
Dec Hex 



204 CC 



212 D4 



FMCLOCK 
FMCB Lock 



FMCRDTPT 
Ptr to RDTE after FMCB Disconnect 



FMCASEGQ 
ASYN Flow Segment Queue 



FMCFBAS 
DFASY Data Q Pointer 



FMCFBRE 
Resp.Data Q Pointer 



FMCSNai 
Session Control Field 



FMCFRESA 
Resp. Any Q Chain Ptr 



FMCDOS 
DOS Extention 



ORGFMCCMPSl 



FMCBUFLM 
Limit of Queued Buffers 



FMCBUFNB 
Number of Queued Buffers 



ORGFMCSIPA 



FMCSIP 
Address of Session Control Inbound PAB 



ORG FMCNXOSQ 



FMCNXCFM 
Next Outbound FM Seq. number 



ORG FMCNXCEM 



FMCB (ISTFMCB) (Continued) 















Dec 


Hex 





1 


2 


3 




ORG FMCNXOSCif2 






154 


9A 

ORG FMCNXOSC 
9A 




FMCNXOSC 
Next Outbound SC Seq. Number 








154 




FMCOASN 




ORG FMCPACE 






160 


AO 


FMCPACEN 
N Value of 
Pacing 






ORC 


5 FMCPACEN 




160 


AO 


FMCPCNT 






ORC 


5 FMCPACE+1 






161 


Al 

ORG FMCPACEM 
Al 

ORG FMCPACE+2 
A2 

ORG FMCPACPC 
A2 

ORG FMCPACE+3 
A3 


FMCPACEM 
M Value of 
Pacing 










161 


FMCMPCNT 












162 




FMCPACPC 
Current Pacing 
count 












162 




FMCCPCNT 












163 




FMCCVAL 
Chain Values 




ORC 


5 FMCCLEXT 






164 


A4 


FMCRPLA 
Address of Application RPL 



I 



FMCB (ISTFMCB) (Continued) 



Dec 


Hex 





1 


2 


3 




ORG FMCRPLA 




164 


A4 


FMCRPLRS 
Reserved 


FMCRPLPT 
Pointer to RPL 




OR 


3 FMCCLEXT44 




168 


A8 


FMCFBA 
Address of FSB Data Queue 




OR 


3 FMCFBA 




168 


A8 


FMCFBRSV 
Reserved 


FMCFBPTR 
Pointer to FSB 




ORC 


5 FMCCLEXT-+5 




172 


AC 
BO 
B4 


FMCRAFM 
Address of FMCB on ACDEB Read Any Queue 


176 


FMCDCLOK 
Control Layer FMCB Lock 


180 


FMCCMPS2 




OR( 


3 FMCCMPS2 




180 


B4 


FMCFLGA 
Flag Field 1 
(Control Layer) 






OR( 


3 FMCCMPS2+1 






181 


B5 

ORG FMCCMPS2+2 
B6 

ORG FMCCMPS2+3 
B7 


FMCFLGCL 
Flag Field 2 
(Record Contro 
Layer) 










182 




FMCPSCMD 
Port Outstanding 
Command Field 












183 




FMCPSTAT 
Port Solicitor 
Status Flags 



FMCB (ISTFMCB) (Continued) 
Dec Hex 



12 3 



ORG FMCCLEXT+20 



FMCPRMRC 
Purge Minor 
Return Gjde 



ORG FMCCLSEQ 





FMCTSQNO 

Expected Response SEQ NR 


FMCBSQNO 
SQNO Lost Received 





ORG FMCSSEGQ 



FMCSEGD 
Segmented input Data Que 



ORG FMCFBAS 



FMCZV002 
Reser Orderly LCPB Address 



ORG FMCZV002 



FMCFBXM 
Pointer to 1st Buffer of IRAN 



ORG FMCSNCTL 



FMCSCFLG 
Flog Byte 



ORG FMCSNaL+1 



FMCSCCTL 
SC Last CTL 
Received 



FMCSCSQN 
SC Lost Seq Nr. Received 



ORG FMCDOS 



FMCREQT 
Outbound Request TAG 



FMCB (ISTFMCB) (Continued) 



ORG FMCREQT 



FMCRTFGS 
Request TAG 
Flag Byte 



ORG FMCREQT+1 



FMCSEQl 
Next Outbound 
Sequence 



ORG FMCDOS+2 



FMCSEQ2 
Next expected 
Inbound Seq. 



FMCFLAGS 
FMCB Flags 



ORG FMCDOS44 



FMCSHEDQ 
Head of Pending RPH Queue 



ORG FMCSHEDQ 



First Byte of 
FMCSHEDQ 



ORG FMCDOS-f« 



FMCLCPBQ 
Head of User LCPB Queue 



FMCCCNT 
Current LCCW Count 



ORG FMCCCNT 



FMCTDAF 
DAF of Test Node 



ORG FMCDOS+14 



FMCTLMOD 


FMCBYTE 


LEXEC 


Flags 


Command 




Modifier 





FMCB (ISTFMCB) (Continued) 



12 3 



ORG FMCDOS+16 



FMCPFCSQ 
Seq Number of Lost 1st In Chain 
RU 



FMCEXFIC 
First in Chain Sequence^Assoc. 
with Exception Resp 



FMCCLRPH 
Ptr to CLS DST 



FMCLRC 
Lost Record Counts (TRACE) 



I 



ORG FMCLRC 



FMCOLRC 
Outbound Lost Record Count 



FMCILRC 
Inbound Lost Record Count 



ORG FMCDOS+28 



260 104 



FMCLXOQ 
LCPBfor Reset Orderly Awaiting Delayed Completion 



ORG FMCPSCMD 



ORGFMCFLAG 



FMCFLAG 
Additional 
Control Layer 
Flags 



FMCFLGB 
Flag Field 2 
(Control 
Layer) 



FMCB (ISTFMCB) (Continued) 

Alphabetical List of Fields in ISTFMCB 
Field Dec Hex Field 



Dec Hex Field 



























(aNM00002 


0030 


OOIE 


FMCFMCBA 


0020 


0014 


FMCPSTRS 


0196 


00C4 


FMCASEGQ 


0212 


00D4 


FMCFRESA 


0228 


00E4 


FMCRAFM 


0172 


OOAC 


FMCBHSET 


0185 


00 B9 


FMCILRC 


0258 


0102 


FMCRDTPT 


0208 


O0DO 


FMCBSQNO 


0192 


OOCO 


FMCIPSEQ 


0188 


OOBC 


FMCREQT 


0232 


00E8 


FMCBUFLM 


0036 


0024 


FMCISSN 


0156 


009C 


FMCRPIA 


0164 


00A4 


FMCBUFNB 


0038 


0026 


FMCLCPBQ 


0240 


OOFO 


FMCRPLH 


0040 


0028 


FMCBYTE 


0247 


00F7 


FMCLNGTH 


0001 


0001 


FMCRPLPT 


0165 


00A5 


FMCCCNT 


0244 


00F4 


FMCLOCK 


0204 


OOCC 


FMCRPLRS 


0164 


00A4 


FMCCLEXT 


0164 


00A4 


FMCLRC 


0256 


0100 


FMCRRESP 


0195 


00C3 


FMCCLRPH 


0252 


OOFC 


FMCLUSTR 


0187 


OOBB 


FMCRSPLM 


0198 


00C6 


FMCCLSEQ 


0190 


OOBE 


FMCLXOQ 


0260 


0104 


FMCRTFGS 


0232 


00E8 


FMCCMDFL 


0031 


OOIF 


FMCMODE 


0052 


0034 


FMCRVDOl 


0158 


009E 


FMCCMPSl 


0036 


0024 


FMCMODEB 


0189 


OOBD 


FMCSAF 


0002 


0002 


FMCCMPS2 


0180 


00 B4 


FMCMPCNT 


0161 


00 A 1 


FMCSCCTL 


0225 


OOEl 


FMCCPCNT 


0162 


00A2 


FMCNPCNT 


0160 


OOAO 


FMCSCFLG 


0224 


OOEO 


FMCCTLB 


0194 


00C2 


FMCNXCFM 


0152 


0098 


FMCSCSQN 


0226 


00E2 


FMCCVAL 


0163 


00A3 


FMCNXOSC 


0154 


009A 


FMCSEGD 


0200 


00C8 


FMCDCLOK 


0176 


00 BO 


FMCNXOSQ 


0152 


0098 


FMCSEQ1 


0233 


00E9 


FMCDEBA 


0032 


0020 


FMCNXTCB 


0004 


0004 


FMCSEQ2 


0234 


00 EA 


FMCDNCBA 


0016 


0010 


FMCOASN 


0154 


009A 


FMCSHEDQ 


0236 


OOEC 


FMCDOS 


0232 


00E8 


FMCOLRC 


0256 


0100 


FMCSIP 


0148 


0094 


FMCDVTA 


0012 


OOOC 


FMCOSSN 


0152 


0098 


FMCSIPA 


0148 


0094 


FMCEXFIC 


0250 


OOFA 


FMCPABl 


0064 


0040 


FMCSNCTL 


0224 


OOEO 


FMCEXLST 


0144 


0090 


FMCPAB2 


0080 


0050 


FMCSSEGQ 


0200 


00C8 


FMCFASYA 


0060 


003C 


FMCPAB3 


0096 


0060 


FMCSSTAT 


0159 


009F 


FMCFBA 


0168 


00A8 


FMCPAB4 


0112 


0070 


FMCSTAT 


0028 


OOIC 


FMCTBAS 


0216 


00D8 


FMCPAB5 


0128 


0080 


FMCSTAT1 


0029 


OOID 


FMCFBPTR 


0169 


00A9 


FMCPACE 


0160 


OOAO 


FMCSTAT2 


0186 


00 BA 


FMCFBRE 


0220 


OODC 


FMCPACEM 


0161 


00 A 1 


FMCTDAF 


0244 


00F4 


FMCFBRSV 


0168 


00A8 


FMCPACEN 


0160 


OOAO 


FMCTLMOD 


0246 


00F6 


FMCFBXM 


0216 


00D8 


FMCPACPC 


0162 


00A2 


FMCTSKID 


0008 


0008 


FMCFLAG 


0182 


00 B6 


FMCPFCSQ 


0248 


00F8 


FMCTSQNO 


0190 


OOBE 


FMCFLAGS 


0235 


OOEB 


FMCPRMRC 


0184 


00 B8 


FMCTYPE 


0000 


0000 


FMCFLGA 


0180 


00 B4 


FMCPROCD 


0048 


0030 


FMCUSFLD 


0024 


0018 


FMCFLGB 


0182 


00 B6 


FMCPSCMD 


0182 


00B6 


FMCVWT 


0044 


002C 


FMCFLGCL 


0181 


00 B5 


FMCPSTAT 


0183 


00B7 


FMCZV002 


0216 


00D8 



Flag Meanings 



Hex Flag Byte 
Disp 



00A3 FMCCVAL 



nil 

1... 
.1.. 



.1 
.. 11 



Pattern 


Pattern 


Nome 


Meaning 


FMCOBCE 


Current Outbound 


FMCFIRST 


First Piece 


FMCMIDLE 


Middle Piece 


FMCLAST 


Lost Piece 


FMCONLY 


Only Piece 


FMCIBCE 


Current inbound 


FMCPRCLS 


Presentation Class 




01= Record 



FMCB (ISTFMCB) (Continued) 



Flag Meanings (Continued) 






Hex 


Flag Byte Contents Bit 


Pattern 


Pattern ^^ 


Disp 


Pattern Nome 


Meaning ^H 


00 B A 


FMCSTAT2 Purge flags 1. 


FMCVPIP 


Vary Purge in HH 
Progress 




.1 


FMCZFOOA 


Purge Succesfully 
completed 






FMCIAIO 


Inhibit all I/O 






1 .... FMCALIPR 


Allocation in 
Progress 






. 1... FMCCPIP 


CLSDST Purge in 
Progress 






. .1.. FMCSEQI 


SEQ/ID, 1 = 
Sequence Number 






. ..11 FMCRSV87 


Reserved 


00 BD 


FMCMODEB Mode byte 1 , . 


FMCHOLD 


Buffer Flood 
Condition 




.1 


FMCCLEAR 


Clear in progress 






FMCAPQ 


Application quiesced 






1 .... FMCLUQ 


LU quiesced 






. 1... FMCRSTSR 


Resetsr in progress 






. .1.. FMCRESOT 


Response outstanding 






. ..1. FMCIBPRG 


l/B Purge chain 






. ...1 FMCPBPRG 


O/B Purge chain 


00B4 


FMCFLGA Flag Field 1 1.. 


FMCFLGAO 


Data expected 




(Control Layer) .1. 


FMCFLGAl 


In Dialogue 






FMCFLGA2 


FMCB on ACDEB for 
Read Any 






1 .... FMCFLGA3 


Incoming Data Flush 






. 1... FMCFLGA4 


Purge in progress 






. .1.. FMCFLGA5 


Buffer Threshold 
Exceeded 






. ..1. FMCFLGA6 


Read done to 3735 
(On) 






. ...1 FMCFLGA7 


FMCB is Locked 


00B5 


FMCFLGCL Flag Field 2 1.. 


FMCFLGBO 


FMCB on ACDEB 




(Record Control 




Dfasy any Q 




Layer) . 1 , 


FMCFLGBl 


FMCB on ACDEB 
Req any Q 






FMCFLGB2 


Satisfy Dfasy Spec. 






1 .... FMCFLGB3 


Satisfy Resp. Spec. 






. 1... FMCFLGB4 


Reserved 






. .1.. FMCFLGB5 


POST=Sched. 
Outstanding 






. ..1. FMCFLGB6 


Hold Response 
Outstanding 






. ...1 FMCFLGB7 


Reserved 



FMCB (ISTFMCB) (Continued) 



Flag Meanings (Osntinued) 

Hex Flag byte Contents 

Disp 



00B6 FMCPSCMD Port Outstanding 
Command Field 



00B6 FMCFLGB 



Flag Field 2 
(Control Layer) 



00B7 FMCPSTAT Port Solicitor 
Status Flags 



00C3 FMCRRESP 



Respond Type 
Expected 



OOEB FMCFLAGS FMCB Flags 



Bit Pattern 


Pattern 


Pattern Name 


Meaning 


1 FMCINVT 


Invite 


.1 FMCCNTCT 


Contact 


..1 FMCRESTI 


Reset Immediate 




Command 


... 1 ... . FMCPURGE 
.... 1... FMCDSEOC 


Outstanding 
Purge (Reset) 
Disconnect End 




of Call 


1.. FMCRDBLK 


Read Block 


11 FMCRSV88 


(Start Input) 
Not defined 


1 FMCFLGA8 


Reset Conditional 




is Active 


.111 nil FMCFLRSV 


Unused 


1 FMCELKST 


Error Lock set 


.1 FMCIDVFD 


TPIOS could not 




find A 


..1 FMCDDOCD 


Dial disconnect 




occurred 


...1 .... FMCPCLSD 


Port being closed 


.... nil FMCRSV09 


by Port Solicitor 
Reserved 


1 FMCFPE 


l=Path End 


.1 FMCFEX 

..1 FMCFME 


Response 

1= Exception 

Response 

0= Function MNMT 


...1 .... FMCFRRN 


End Resp. 
1= Reached 


.... 1... FMCTSLHA 


Recovery Mode 
1= Term Self Last 




has Arvd. 


Ill @NM00004 


Reserved 


1 FMCSIRP 


Session Indication 


.1 FMCUSIND 


Req. pend. 
Potential Session 




Indicator 


..1 FMCUSINl 


Copy of Pot.Sess. 




Indicator 


...1 .... FMCSIRE 


Session Initiation 




Request ended. No 




queue 



FMCB (ISTPMCB) (Continued) 



Flag 


vAeanings 


(Cont 


nued) 


Hex 
Disp. 


Flag 

FMCFLAGS 
(Continued) 


Contents 


OOEB 





First byte of 
FMCSHEDQ 



OOEO FMCSCTLG Flag Byte 



00E8 FMCRTFGS Request TAG 
Flag Byte 



00F7 FMCBYTE Flags 



00 IC FMCSTAT Source Statu: 

Info 



Bit 


Pattern 


Pattern H 


Pattern 


Name 


Meaning M 


1., 


FMCSTRE 


■ 
Session Termination 
Request ended, no 
Queue posted 


1. 


FMCRESET 


Reset Request in 
Progress, do not 
Post 


1 


FMCSIRQ 


Session Initiation 
Request queued for 
Connection 




FMCSTPRT 


Start Print bit 


1 


FMCSHEDG 


Gating bit 


11 


FMCIBSAC 


Save IBSQAC 


..11 ... 


FMCOBSAC 


Save OBSQAC 




FMCLURO 


LU owes Response 




FMCAPRO 


AppI owes Response 


.... !.i 


FMCSCCLO 


Clear outstanding 




FMCSTCTL 


1=CLUS already 
Sched. 


111. ... 


FMCRSV12 


Reserved 


...1 ... 


FMCLBIND 


Last Block Indicator 




FMCNONCB 


No NCB indicator 




FMCINPET 


Invite Perpetual Ind 


.... !.i 


FMCASBTU 


Associated BTU 
to Come 




FMCRSVl 1 


Reserved 


1 


FMCCRF 


Contact Required 


.1 


FMCSESAQ 


PORTSOL session 
Acquired 


..1. ... 


FMCEOTRQ 


EOT Expected after 
RVI from Reset 
Orderly. 


...1 ... 


FMCSSREQ 


Session Status 
Change Ind. 




FMCBRV4 


Reserved 




FMCBRV5 


Reserved 


.... ..1 


FMCBRV6 


Reserved 




FMCBRV7 


Reserved 


1 


FMCPRMTR 


FMCB is a 
Preemptor 


.1 


FMCPRMTE 


FMCB is a 
Preemptee 


..1. ... 


FMCDAPT 


Device Accepted 


...1 ... 


FMCDEVOF 


Device varied or 
set by Vary DSACT. 



FMCB (IS1?MCB) (Continued) 



Flag Meanings 


(Cont 


inued) 


Hex 
Disp. 


Flag 

FMCSTAT 
(Continued) 


Contents 


001 C 





OOID FMCSTATl Status Informotic 



OOIF FMCCMDFL Command flags 



009f FMCsstot Session-CPM 

Status 



Bit Pattern 


Pattern 


Pattern Name 


Meaning 


.... 1... FMCDEDSC 


Device disconnected 


1.. FMCZF007 


Buffer Trace 




Active flag 


1. FMCLTEAS 


Lost Term Exit 




scheduled for this 




FMCB 


1 FMCVSPl 


Soft Purge in 




Progress 


1 FMCVSP2 


A User Request 




was Soft Purged 


.1 FMCHPURG 


Session has been 




Hard Purged 


..11 nil (oiNMOOOOl 


Reserved 


1 FMCCMDR 


1= Initial Self 




Revd 


.1 FMCVSNA 


FMCB for Vary 




Session 


..1 FMCSNA 


User Session with 




NewDev's. 


...1 nil (SINMOOOOS 


Reserved 


1 FMCSNBI 


Session not Bound 


.1 FMCCIPI 


TPIOS Clear in 




Progress 


..1 FMCUIPI 


Unbind in Progress 


...1 .... FMCSDTR 


SDT Required 


.... 1... FMCBIP 


Bind in Progress 


1.. FMCNSALU 


No Session exists 




between the 




Application and 




the LU 


1. FMCPURCH 


TPIOS Purging 




Chain start 


1 FMCCONF 


Sick Flag 



Constants in 


ISTFSB 




Label 


Value 


Meaning 


FMCZHRIP 


X'lOOO' 


RESYNCH in Progress 


Common Constants Follow 




FMTYPE 
FMCOBCEI 
FMCIBCEI 
FMCRCD 


X'03' 
B'OOOl' 
B'lr 
■RECORD' 


Type Code for FMCB 
Equate for Record Mode 





FSB 

Dec 


32 


3 

4 
4 

8 

8 
8 
12 
12 
12 


(ISTFSB) 














Hex 


20 





1 


2 


3 


) 


FSBFSB 
FSB without FDB 




FSBFDB 
First FDB 




OR 


G FSBFSB 











FSBTYPE 
Control 
block type 


FSBLNGTH 
Length in 
bytes 


FSBMNRCD 
Minor return 
code of physica 
condition 






OR 


G FSBFSB + 3 








3 




FSBSFLGS 
Tpios session 
flaps 














4 


FSBFSB A 
Address of next FSB 




OR 


G FSBFSB A 








4 


First byte of 
FSBFSBA 






OR 


G FSBFSB + 8 








8 


FSBBTH 
BTH fields 




OR 


G FSBBTH 






8 


FSBCID 
Communication ID 




OR 


G FSBCID 




8 


FSBSAF 
Sixteen BIT source ID 


FSBDAF 
Sixteen BIT destination ID 




OR 


G FSBBTH + 4 








C 


FSBRQTAG 
Request tag 






OR 


G FSBRQTAG 








C 


FSBSEQID 
Sequence number of ID, SDCC 






OR 


G FSBSEQID 










C 


FSBFLAGS 
Flag byte 





I 



FSB (ISTFSB) (continued) 



12 3 



ORG FSBSEQID + 1 



FSBSEQ 

Sequence 

number 



FSBCMD 
LCCW command 
for local dev 



ORG FSBBTH + 6 



14 E 



ORG FSBCSWST 



ORG FSBTHFLD 



FSBCSWST 
CSW status 



FSBTHFLD 
Transmission header 



FSBTHl 
TH byte 1 



ORG FSBTHFLD + 1 



FSBSYSRS 
System response 



FSBTH2 
TH byte 2 



ORG FSBFSB + 16 



FSBNETRS 
Network response 



ORG FSBNETRS 



FSBSRCAT 
System response 
category 



ORG FSBSRCAT 



FSBMJRCD 
Major return 
code 



ORG FSBNETRS + 1 



ORG FSBFSB + 18 



FSBERC I 

Extented response 

conditions j 



FSBEXTRS 
Extended response 



FSBDMGRS 
Device management response 



FSB (IS7FSB) (continued) 

















Dec 


Hex 





1 


2 


3 




ORG FSBDMGRS 










18 


12 

ORG FSBDMGRS +1 
13 




FSBSSl 

Status sense 

byte 1 














19 






FSBSS2 

Status sense 

byte 2 




ORG FSBFSB + 20 






20 


14 


FSBLCPB 
Address of LCPB 




OR 


G FSBLCPB 






20 


14 


FSBAASGID 
Operator message ID 




OR 


GFSBMSGID 






20 


14 


FSBICNCB 
ICNCB PTR - checkpoint rest 




OR 


G FSBFSB + 24 






24 


18 


FSBLCCWA 
LCCW address 




OR 


G FSBLCCWA 






24 


18 


FSBRLSTS 
Buffer release 
status 






OR 


G FSBFSB +28 




28 


IC 


FSB 
THdc 


THCNT 
3ta count 


FSBRSVOl 
Reserved 




OR 


G FSBNETRS 






16 


10 


FSBCOMBN 




OR 


GFSBCOMBN 






16 


10 


FSBALIGN 
Aliignment 
byte 


FSBRHFLD 
Request/response 


leader 




OR 


riF'^RRHFin 






17 


11 

ORG FSBRH3 
13 


FSBRHl 
RH byte 1 


FSBRH2 
RH byte 2 


FSBRH3 
RH byte 3 










19 




FSBLDFLG 
Local device 
flags for 
record mode 



I 



FSB (ISTFSB) 


(Conti 


n^, 




















Dec Hex 





1 


2 


3 




ORC 


5(a)NM00008 
















12 C 


First byte of 










FSBRQTAG 
















ORC 


;(aNM00008+l 






13 D 








Second 


byte of 












stof F 


"elds in 




FSBRQTAG 










Alphabetical L 


1ST 


-SB 






Field 


Dec 


Hex 


Field 


Dec 


Hex 


Field 


Dec 


Hex 


@NM00008 


0012 


OOOC 


FSBLCCWA 


0024 


0018 


FSBSEQ 


0013 


OOOD 


FSBALIGN 


0016 


0010 


FSBLCPB 


0020 


0014 


FSBSEQID 


0012 


OOOC 


FSBBTH 


0008 


0008 


FSBLDFLG 


0019 


0013 


FSBSFLGS 


0003 


0003 


FSBCID 


0008 


0008 


FSBLNGTH 


0001 


0001 


FSBSRCAT 


0016 


0010 


FSBCMD 


0013 


OOOD 


FSBMJRCD 


0016 


0010 


FSBSSl 


0018 


0012 


FSBCOMBN 


0016 


0010 


FSBMNRCD 


0002 


0002 


FSBSS2 


0019 


0013 


FSBCSWST 


0014 


OOOE 


FSBNSGID 


0020 


0014 


FSBSYSRS 


0014 


OOOE 


FSBDAF 


0010 


OOOA 


FSBNETRS 


0016 


0010 


FSBTHCNT 


0028 


001C 


FSBDMGRS 


0018 


0012 


FSBRHFLD 


0017 


0011 


FSBTHFLD 


0014 


OOOE 


FSBERC 


0017 


0011 


FSBRHl 


0017 


0011 


FSBTHl 


0014 


OOOE 


FSBEXTRS 


0015 


OOOF 


FSBRH2 


0018 


0012 


FSBTH2 


0015 


OOOF 


FSBFDB 


0032 


0020 


FSBRH3 


0019 


0013 


FSBTYPE 


0000 


0000 


FSBFLAGS 


0012 


OOOC 


FSBRLSTS 


0024 


0018 








FSBFSB 


0000 


0000 


FSBRQTAG 


0012 


OOOC 








FSBFSBA 


0004 


0004 


FSBRSVOl 


0030 


001 E 








FSBICNCB 


0020 


0014 


FSBSAF 


0008 


0008 








Flag Meanings 


















Hex Flag 




Contents 


Bit 




Pattern 


Pattern 


Disp Byte 


JS 








Patter 




Name 
FSBRFIND 


Mean 
Reque 


ng 


OOOC FSBFLAC 


Flag Byte 




st Feedback 
















Indicator 










.1.. 




FSBACIND 


Add it 


onal Command 
















Indicator 










..1. 




FSBFFIND 


Funct 


on Flag 
















Generated 










...1 




FSBLBIND 


Last Block Indicator 














FSBNONCB 


No NCB for this 
Request 












1.. 


FSBINPET 


Invite 


Perpetual 
















Response 












.1. 


FSBASBTU 


Associated Response 
to Come 












..1 


FSBDTRCE 


Device Trace 






















Request 



FSB 


nSTFSB) (Cont 


inued) 










1 Flag Meanings (Conti 


nued) 










Hex 


Flag 


Contents 


Bit 




Pattern 


Pattern 


Disp. 


Byte 




Pattern 


Name 


Meaning _ 


000 C 




First Byte of 
FSBRQTAG 


.1.. 
..1. 


.1.. 

..1. 
...1 


FSBRTOO 
FSBRTOl 
FSBRT02 

FSBRT03 
FSBRT04 
FSBRT05 

FSBRT06 
FSBRT07 


Logical Error FlagI 
Contrl Block Error | 
End of Scheduling 
Block 

Write/Read Request 
Feedback Requested 
Decrement Sched 
Count on Dequeue 
Write Request 
Scheduling Flag 


OOOD 




Second Byte of 
FSBRQTAG 


.1.. 
..1. 




FSBRT08 

FSBRT09 
FSBRTOA 
FSBRTOB 


Device End 
Notification 
Critical Text Flog 
Contact 

Disconnect Major 
Return Code Type 
Value 


CODE 


FSB5YSRS 


System Response 


.li! 


nil 


FSBSERR 

FSBSPHSE 

FSBSCODE 


Error Flag 
Response Phase 
Response Code 


OOOF 


FSBEXTRS 


Extended Response 


111. 


1111 

111. 
...1 


FSBXFSTS 
FSBXNORM 

FSBXCODE 

FSBXFINS 
FSBXLCI 


First Status 
Off for Norm 
First Status 
Extended Response 
Code 

Final Status 
Leading Chars 
Indicated 


0002 


FSBMNRCD 


Minor Return Code or 
Physical Condition 
Flogs 


.1.. 
..1. 


1... 
.1.. 

..1. 

...1 


FSBMNELI 

FSBMNRVI 

FSBMNATN 

FSBMNDNU 

FSBMNEOP 

FSBMNDIF 

FSBMNOA 

FSBMNSDA 


Error Lock Indicator 
RVl Received 
ATTN Received 
Device not Usable 
Output Error 
Dialog Initiation 
Feature 

Operation Aborted 
Due to Con 
Sense Data 
Available 


0003 


FSBSFLGS 


TPIOS Session Flags 






FSBPGBUF 


Pageable Buffer 








.111 


iiii 


FSBRSV02 


Reserved 


0004 




First ByfeofFSBFSBA 






FSBGATE 


Gating Flog 



FSB (ISTFSB) (Continued) 



Flag Meanings (Cont 


nJed) 








Hex 


Flag 


Contents 


Bit 


Pattern 


Pattern 


Disp. 


Byte 




Pattern 


Name 


Meaning 


0011 


FSBERC 


Extended Response 


1 


FSBEDI 


End of LCP 
Indicator 






Conditions 


.1 

..1 

...1 .... 
.... 1... 

1.. 

1.. 

1. 

1 


FSBEC! 

FSBEBI 

FSBEMI 

FSBETI 

FSBFBMl 

FSBLMRI 

FSBLGI 

FSBSOHI 


End of Command 

Indicator 

End of Block 

Indicator 

End of Message 

Indicator 

End of Transmission 

Indicator 

First Block in 

Message Indicator 

Logoff Message 

Received 

Leading Graphics 

Indicator 

SOH Indicator 


0012 


FSBSSl 


Status Sense Byte 1 


nil 1... 
1.. 

1 


(oJNMOOOOS 
FSBSSUS 
FSBSSDE 
(q)NM00006 


Reserved 
Unit Specify 
Device End 
Reserved 


0013 


FSBSS2 


Status Sense Byte 2 


11 

..1 

.... .']'.'. 
.... '...] 


(q)NM00007 

FSBSSCR 

FSBSSIR 

FSBSSEC 

FSBSSDC 

FSBSSCC 

FSBSSOC 


Reserved 
Command Reject 
Interv. Required 
Equipment Check 
Data Check 
Control Check 
Operation Check 


0013 


FSBLDFLG 


Local Device Flags 




FSBLDRMF 


Record Mode Flag 






for Record Mode 


.1 

..1 

.... .].. 

1. 

1 


FSBLDSCF 
FSBLDFME 
FSBLDBBF 
FSBLDEBF 
FSBLDSOF 

FSBLDSIF 

FSBLDCUF 


Session Control Flag 
FME Requested Flag 
Begin Bracket Flag 
End Bracket Flag 
Send Output 
Command Flag 
Send Input 
Command F lag 
Clear/Unbind Flag 


0018 


FSBRLSTS 


Buffer Release 
Status 


1 


FSBCFTX 


Buffer Contains 
Confid Text 








.111 nil 


FSBRLRSV 


Reserved 



FSB (ISTFSB) (Continued) 



Constants in 


ISTFSB 






Label 


Value 


Meaning 




FSTYPE 


X'02' 


Type Code for FSB 




FSTRACE 


X'8F' 


Trace FSB 




FSTYPEA 


X'80' 


FlDl FSB 




FRREJBB 


X'90' 


Rejected Begin Bracket 




FRREJBS 


X'94' 


Rejected Bracket Status 




FSTHCON 


X'lEOO' 


3270 Record TH Bytes 1,2 




FRMNSALU 


X'OO- 


No Session Exists 




FRMRCDMP 


X'29' 


Reset Condi Reject- Error Lock Set 




FSATHCON 


X'lFOO' 


Asynchronous TH Constant 




FRNORM 


X'OO' 


Normal Feedback 




FRCBLKE 


X'04' 


Control Block Error 




FRLOGICE 


X'08' 


Logical Error in Access Method 




FRPHYSC 


X'OC 


I/O Error 




FRPPRIEX 


X'OD' 


RU Purged Due to Exception on Prior Element on 


Chain 


FRNEGRCC 


X'lO' 


Condit Commnd Not Performed 




FRESPEC 


X'OC 


Special Condition 




FRCMDRST 


X'18' 


Command Terminated by Reset 




FRPURGE 


X'lC 


Request Purged 




FRDISCNT 


X'28' 


Device Disconnected 




FRMLCCWS 


X'04' 


LCCW Synch Completion Code 




FRNETP 


X'80' 


Network Processing 




FRLINTR 


X'84' 


Line Trace 




FRMDR 


X'88' 


MDR Record 




FROLT 


X'8C' 


OLTT 




FRNOTIFY 


X'30' 


Notify 




FRCLRRSP 


X'31' 


Clear Response 




Minor Return Codes for Normal Feedback 




FRMOK 


X'OO' 


OK So Far 




FRMRCDPR 


X'04' 


Reset Condition Successful, Read Ahead Data Present 


FRMLSYN 


X'04' 


LCCW Synchronization 




FRMSRCTL 


X'OC 


CTL Command Session Record 




FRMIRCTL 


X'lO' 


CTL Command Incident Record 




FRMRSTEL 


X'40' 


Reset Error Lock Completed 




FRMRSTQP 


X'4]' 


Reset of Queue Complete 




FRMRELCB 


X'30' 


Release CB 




FRMNPCR 


X'31' 


Clear Response 




FRMNPUR 


X'32' 


Unbind Response 




FRMRSTSR 


X'33' 


Resetsr Response 




Minor Return 


Codes for Control Block Error 




FRMINVCF 


X'81' 


Invalid Chaining FLD in LCCW 




FRMIECMD 


X'87' 


Invalid Escape CMD 




FRMLGCNT 


X'88' 


Leading Graphics Count > 15 




FRMESCNT 


X'89' 


Escape CMD Count <4 




FRMCPCNT 


X'8A' 


Copy LCC Count NE 3 




FRMINDAT 


X'97' 


Invalid Data Addr/Length 




FRMINCNT 


X'8B' 


Invalid Data Count 




FRMINDTR 


X'17' 


Invalid Data/CNT-Record Mode 




FRMNSEGE 


X'lC 


Segmenting Error 





FSB (ISTFSB) (Continued) 



Constants in ISTFSB (Continued) 

Label Value Meaning 

Physical Condition Minor Return Codes 



FRMDENOT 


x'or 


FRMLOERR 


X'88' 


FRMNRP 


X'80' 


FRMLERR 


X'80' 


FRMLOSNS 


X'89' 


FRMLESNS 


X'81' 


Minor Return Codes for 


FRMVTAME 


X'AO' 


FRMILRS 


X'Al' 


FRMRDIP 


X'A2' 


FRMUSELE 


X'A3' 


FRMINVL 


X'A3' 


FRMCTLCF 


X'A4' 


FRMOL7F 


X'A5' 


FRMCDITS 


X'A6' 


FRMCRNF 


X'A7' 


FRMELNV 


X'A9' 


FRMNELNV 


X'AA' 


FRMLCH 


X'AB' 


FRMNORD 


X'AC 


FRMINVBS 


X'AD' 


FRMSEQER 


X'AE' 


FRMERNR 


X'AF' 


FRMTRUN 


X'BO' 


FRMCPYE2 


X'Bl' 


FRMRELNP 


X'B2' 


FRMCPYEl 


X'BS- 


FRMCPYE3 


X'B3' 


FRMPRMl 


X'B4' 


FRMPRM2 


X'B5' 


FRMBHNDG 


X'B6' 


FRMMDNDG 


X'B7' 


FRMRCNA 


X'B8' 


FRMRDLGO 


X'B9' 


Minor Return Codes for 


FRMNRCC 


X'OO' 


FRMYTC 


X'80' 



3270 Device End Notification 

3270 Local Output Error Without Sense 

Negative Response to Polling 

3270 Log I/O Error v/ithout Sense 

3270 Loc Output Error with Sense 

3270 Loc I/O Error with Sense 



VTAM Error 

Incompatable Local/Remote Sysgens 

Reset or Deactivate + Clear in Progress 

User Logic Error 

User Logic Error 

Control Command 

OLTT Failure 

Conflicting Dialogue Initiation/Termination 

Conversational Reply not Feasible 

Escape LCCW not Valid 

Non Escape LCCW not Valid 

LCCW Count Exceeds 255 

No Read where Required 

Invalid BTU System Response 

Response Sequence Error 

Expected Response not Received 

Data Truncation Occurred 

Attempt to Copy from Device on Different Cluster 

Reset Error Lock not Performed 

Attempt to Copy from UNOP DEV 

Attempt to Copy from a Device 

Attempt to Preempt Preempted FMCB 

Attempt TP Preempt an FMCB with Preempt Pending 

Dialogue Entry Failed Due Invalid BH Set 

Dialogue Entry Failed Due Invalid Processing Options 

Read Continuous not Allowed 

Read with Data Length GT Internal TPIOS only 



Reset not Performed 
Yielded to Contention 



Minor Code for Command Reset 

FRMCDRST X'OO' Command Fias been Reset 



FSB (1ST? SB) (ConMnued) 

Constants in ISTFSB (Continued) 

Label Value Meaning 



Minor Return Codes for Notify 

FRMPREMT X'OB' 

FRMRESTR X'OC 

FRNCDTRM X'OD' 



TOLTEP Preempt 
Restore After Preempt 
Conditional Term Self 



Minor Return Codes for Request Purged 



FRPRARSS 


X'OT 


3705 Abend, Restart Successful 


FRPRABND 


X'02' 


Early Warn, Recov in Prog 


FRPPCHFL 


X'03' 


Permanent Channel Failure 


FRPRANSH 


X'04' 


Auto Network Shutdown 


FRPAPABD 


X'05' 


Application Abended 


FRPCLSDO 


X'06' 


CLSDST Occurred 


FRPVRYOF 


X'07' 


Vary Offline Occurred 


FRPDISCO 


X'CB' 


Disconnect Occurred 


FRPDBTEX 


X'09' 


Buffer Threshold Exceeded 


FRPRTF 


X'lO' 


Temp Record Device Failure 


FRPRTS 


x'lr 


Terminate Self 


FRPRAP 


X'OA' 


AppI Issued Clear 


FRPRPR 


X'OB' 


Preempt 


FRNFRE 


X'OC 


Restore 


FRPARSSL 


x'sr 


This is last Operation Purge for 3705 Abend, Restart 


Minor Return Codes for Network Processing 


FRMMTAID 


X'OO' 


MTA Device Identified 


FRMNPLQ 


X'04' 


Neg Poll Limit Reached Queue Option 


FRMNPDES 


X'08' 


Device End Status 


FRMNPSE 


X'80' 


Error Sense/Status 


FRMDEBSF 


X'84' 


Device Error - BSC Status to Follow 


FRMBIDE 


X'OC 


BSC ID Error 


FRMMTABS 


X'18' 


MTA/BSC Verify Successful 370X 


FRMBSCR 


X'90' 


BSC ID Verify Successful (in Host), Error Lock Set 


FRMNUTRM 


X'94' 


BSC ID Verify Unsuccessful Error Lock Set 


FRMNPHPS 


X'lO' 


Hold - Pending Sense/ST 


FRMNPRMD 


X'20' 


Request Monualdial 


FRMBSCOK 


X'lC 


BSC ID Association Success- Ful in TPIOS 


FRMBSCKO 


X'lE' 


BSCID Successful in VSl TPIOS 


FRMUNID 


X'14' 


Unidentified Dial in Terminal 


FRMNPRDV 


X'42' 


Reset Conditional Failed 


FRMFIRM 


X'lO' 


LU Failed 


FRMTERM 


X'lT 


Terminate Received 


Minor Return Codes for Line 


Trace 


FRMLINTR 


X'OO' 


Line Trace 


FRMLTRE 


X'04' 


Line Trace Terminated by ERR 



Minor Return Codes for MDR Records 
FRMMDR X'OO' MDR Records 



FSB (ISTFSB) (Conflnued) 
Constants in ISTFSB (Continued) 



Label 



Value 



Meaning 



Minor Return Codes for OLTT 




FRMOLTR 


X'80' 


OLT Request Message 


FRMOLTE 


X'04' 


OLTT CMD Terminated 


FRMOLTNC 


X'90' 


No CCW String Queued 


FRMOLTNT 


X'91' 


CCW String Queued - Not Test Mode Reqs 


FRMOLTNS 


X'92' 


I/O not Started - HDV not Issued 


***** Minor Return Code for Command Reset **** ** 


FRMRSTRM 


X'80' 


Reset by Successful TRM 


FRMRUTRM 


X'8T 


Reset by Successful TRM 


**** Minor Return Codes for Physical Condition **** 


FRMUSDA 


B'OOOOOOOr 


Unsol Sense Data Avail 


FRMSE 


B'loooooor 


Error Sense Data Avail 


FRMUSE 


B'loooooor 


Error, Unsolicited, Sense 


FRMDDR 


X'90' 


Asyn Dial Discon Received 


FRMNCLR 


X'OA' 


Cleared by Clear 


FRMCU 


X'06' 


Cleared by Clear/Unbind 


FRMCUN 


X'07' 


Cleared by Clear/Unbind/Notfy 


NCP System Response Field 




Response Phase 






NCPPHSEO 


B'OO' 


Phase Response 


NCPPHSEl 


B'or 


Phase 1 Response 


NCPPHSE2 


BMO- 


Phase 2 Response 


NCPPHSE3 


B'll' 


Phase 3 Response 


Phase Non Error Responses 




NCPDAC 


B'oooir 


Device Assyn Complete 


NCPMTAID 


B'OOlOO' 


MTA Device Identified 


NCPCAPM 


B'ooior 


Channel Adapter to Prim Mode 


NCPCASM 


B'oono' 




NCPESYSS 


B'ooni' 


Entering System Slowdown 


NCPLSYSS 


B'OIOOO- 


Leaving System Slowdown 


NCPICOMP 


B'OIOOT 


hit Complete 


NCPMDR 


B'OlOlO' 


MDR Record 


NCPANSCT 


B'lioir 


Auto Network Shutdown via Channel Timeout 


NCPANSOP 


BMllOO- 


Auto Network Shutdown via Operations Panel 


NCPANSC 


B'lnoi' 


Auto Network Shutdown Complete 


NCPMSLOG 


B'lnio' 


Serviceability Aid Mass Storage Logging 


NCPOFLO 


B'll 111' 


Overflow Configuration 


Phase 1, 2, 3 non Error Responses 


NCPOK 


B'OOOOO' 


Command OK So Far 


NCPLGR 


B'OOOOl- 


Leading Graphics Received 


NCPOKD 


B'OOOlO' 


OK So Far with Date 


NCPNPLQ 


B'oooir 


Negitive Poll Limit Queue Option 


NCPOLTR 


B'OOlOO' 


OLT Request 


NCPNPLNW 


B'OOllO' 


Negative Poll Limit - Nowait Option 


NCPLINTR 


B'ooni' 


Line Trace 


NCPBSTAT 


B'ooior 


BSC Status Message 



FSB (ISTFSB) (Continued) 



Constants in 


ISTFSB (Contii 


lued) 


Label 


Value 


Meaning 


Phase Error 


Responses 




NCPCHERR 


B '00000' 


Channel Error 


NCPIRID 


B'OOOOT 


Invalid Resource ID 


NCPICMD 


B'OOOlO' 


Invalid Command 


NCPIMOD 


B'OOOir 


Invalid Modifier 


NCPRSIP 


B'OOlOO' 


Reset or Deactivate Progress 


NCPDIACT 


B'00101' 


Device Inactive 


NCPLIACT 


B'OOllO' 


Line Inactive 


NCPCNVR 


B'OOlll' 


Command not Valid for Resource 


NCPCSXE 


B'OIGGO' 


Command Syntax Error 


NCPCNBS 


B'oioor 


Command did not Conform to BSC Specifications 


NCPICDL 


B'OlOlO' 


Invalid Control Data Leng 


NCPRSNP 


B'OIOIT 


Reset not Performed 


NCPGPA 


B'OIOIT 


Gen. Poll Aborted 


NCPDNCR 


B'OllOO' 


Data not Core Resident 


NCPDSQL 


B'oiior 


Dial Set Queue Limit Reached 


NCPSDLI 


B'oino' 


Switched Device Line Incompatibility 


NCPITXL 


B'omr 


Invalid Text Length 


NCPICOD 


B'looor 


Invalid Control Data 


NCPINBTU 


BMOOIO' 


Incomplete BTU 


NCPDATIU 


B'lOlOO- 


Data in Use 


NCPICCM 


B'loior 


Invalid Control Command or Modifier 


NCPOLTRJ 


BMOllO' 


OLT Command Rejected 


NCPMULTD 


B'llOOG' 


Multiple Dial Requests 


NCPMODl 


B'noor 


Mode Inconsistency 


NCPBUFNA 


B'llOlO' 


Buffer not Available 


NCPSYSS 


BMioir 


Command Rejected System In Shutdown 


NCPERLS 


B'lllOO' 


Command Rejected Error Lock Set 


NCPCNOP 


B'liior 


Command Rejected Channel Inoperative 


NCPCRS 


B'lmo' 


Command Reset or Line Deactivated 


NCPESCO 


B'liiir 


Phase Error Escape 



Extended Response (Final 
NCPIPLE B'OOOOl 

NCPIVNE B'OOlOr 

NCPTELE B'OOlOO' 



Status) for Phase Error Escape 
IPL Lock on 
Invalid Node 
Trunk Error Lock on 



Phase 1, 2, 3 Error Responses 

NCPDACHK B'OOOOO' 

NCPPIVR B'OOOOr 

NCPIVR B'OOOlO' 

NCPNPLW B'OOOIT 

NCPYCNT B'OOlOO' 

NCPDEBF B'OOlOr 

NCPBIDER B'OOllO' 

NCPLTRT B'OOlll' 

NCPOCT B'OIOOO' 

NCPSSNS B'oioor 



Data Check 

Possible Interventions Required 

Intervention Required 

Negative Poll Limit — Wait Option 

Yield to Contention 

Device Error — BSC Status to Follow 

BSC ID Error 

Line Trace Terminated 

OLT Command Terminated 

Session not Started BSC Status Message 



FSB (ISTFSB) (Confinued) 

Constanls in ISTFSB (Continued) 

Label Value Meaning 



NCPESTAT 


B'OlOlO' 


BSC Error Status Message 


NCPDCREC 


B'onoo' 


Data Disconnect Received 


NCPBRREC 


B'lOOir 


Break Received 


NCPCRJS 


B'llOOO' 


Contact Rejected Session Started 


NCPDDIC 


B'lioor 


Dial Data Inconsistency Command Reset 


NCPIPLR 


B'OllOl' 


IPL Required 


NCPTRNKE 


B'OlllO' 


Trunk Error 


NCPBLKR 


B'oiiir 


Remote Block Returned Host 



NCP Extended Response Field Values 
First Status Values 



NCPXCNTL 


B'OOO' 


Control 


NCPXTXT 


B'OOT 


Text 


NCPXTTXT 


B'OlO' 


Transparent Text 


NCPXHEAD 


B'Oir 


Heading 


NCPXSPEC 


B'lOO' 


Special 


NCPXHCHK 


B'lll' 


Hardware Check 



Final Status Values v/ith Normal First Status ije. Control, Text, 
Transparent Text or Heading 



NCPXTIMT 


B'OOOO- 


Timeout 


NCPXCUTF 


B'OOlO' 


Cutoff 


NCPXABLK 


B'OOir 


Abort Block 


NCPXEHE 


B'OlOO' 


EOT Halted ERP 


NCPXDCE 


B'OlOl' 


DLE Control End 


NCPXWRAK 


B'OllO' 


Wrong ACK 


NCPXRSBE 


B'1000' 


Received Sub Block End 


NCPXETX 


B'loor 


End of Text 


NCPXETB 


B'lOlO' 


End of Block 


NCPXENQ 


B'1011' 


Enquiry 


NCPXEOT 


B'llOO' ■ 


End of Transmission 


NCPXRVI 


B'lior 


Reverse Interrupt 


NCPXPACK 


B'ino' 


Positive ACK 


NCPXWACK 


B'lni' 


Wait ACK 



Final Status Values with Special First Status 
Timeout — same as Normal First Status 



NCPXCREJ 


B'OOOl- 


Command Reject 


NCPXBPE 


B'OOlO' 


Buffer Pool End 


NCPXSLTD 


B'OOll' 


Selected 


NCPXRDS 


B'OlOO' 


Received Disconnect Signal 


NCPXLDTA 


B'oior 


Lost Data 


NCPXRSET 


B'OllO' 


Reset 


NCPXPLLD 


B'Olll' 


Polled 


NCPXXSBE 


B'lOOO' 


Transmit Sub Block End 


NCPXESWR 


B'loor 


EOT Sent after Wack Received 



FSB (ISTFSB) (Continued) 



Constants in ISTFSB (Continued) 


Label 


Value 


Meaning 


NCPXRBT 


B'lOlO' 


Received Break in Text 


NCPXPLLS 


B'lOlT 


Polling Stop 


NCPXEOTS 


B'TIOO' 


EOT Sent 


NCPXRCB 


B'llOT 


Received Break 


NCPXDSCT 


B'lllO' 


Disconnected 


NCPXCNTD 


B'llll' 


Connected 


Final Status Vai 


lues with Hardware Check First Status 


NCPXEQUC 


B'OOOO' 


Equipment Check 


NCPXCSBC 


B'OOlO' 


CSB Check 


NCPXADC 


B'OlOO' 


Adapter Check 


NCPXUSER 


B'OllO' 


User Error 


NCPXMODC 


B'lOOO' 


Modem Check 


NCPXDTOC 


B'lOlO- 


DSR Turn on Check 


NCPXDTFC 


B'llOO' 


DSR Turn off Check 


NCPXACUC 


B'lno- 


ACU Check 


**** Miscellaneous Equates 


**** 


FSBLCWMX 


X'FF' 


Max^^ LCCW's LCPB 


FRMCRJSS 


X'08' 


Contact Rjcted, Sesn Started 


FSBNRMST 


X'OC 


Normal I/O Status of CE, DE 



I 



Session Flag Values 


FSESCS 


x'or 


FSESIS 


X'02' 


FSESCR 


X'03' 


FSESDS 


X'04' 


FSESCWDS 


X'05' 


FSESIDS 


X'06' 


FSESIADS 


X'07' 


FSESDF 


X'08' 


FSESCF 


X'09' 


FSESIF 


X'OA- 


FSESSSDF 


X'OB' 


FSESISDF 


X'OC 


FSESIR 


X'OE' 



RH, TH, Sense Constants 
FSSEQSNS X '00000000' 

FSSEQSLN X'04' 

FSEPRRH X'930100' 

FSDEONLY X'0200' 

FSSNAMSK X'3FFF' 



Contact Successful 

Invite Successful 

Contact Rejected 

Disconnect Successful 

Contact/Write/Disconnect Successful 

invite/Disconnect Success 

Invite W. Auto Restart Completed a Cycle 

Comm'd with Discon. Failed 

Write with Contact and Disconnect Failed 

Invite with Connect Failed 

Write with Contact and Disconnect Failed to End Session 

Invite Started Session but Disconnect Failed 

Invite Rejected - Disc Sent 



SEQ Num Sense Field 

Length of Above 

Stand-Alone Pacing Response RH 

DE Only Status 

Mask to Zero First Two Bits of Status 



ICE (ISTiCE) 



Dec Hex 




16 10 



ICEFIAGS 
F lag Bytes 



ICESUBJ 
Address of ACDEB or RDT 



ICE OBJ 
Address of RDT or ACDEB 



ICESUBJQ 
Link Field for Sub Chain 



iCEOBJQ 
Link Field for OBJ Chain 



iCESIDE 
Field Link for Other Ices 



ICEDATA 
Address of Request Data 



ICERPHA 
Address of RPH 



(a)NM00002 
PAD to Full Word 



ICEUECBX 
Anchor for Chain of UECBS or ICX 



ICERSC2B 
Resource 2 Name from Initiate RU 



ICE (ISTICE) (Continued) 



Alphabetical List of Fields in ISTICE 
Field Dec Hex Field 



He> 



Field 



@NM00002 0029 OOID ICEOPJQ 

ICEDATA 0020 0014 ICERPHA 

ICEFLAGS 0028 0010 ICERSC2B 

ICEOBJ 0004 0004 ICES IDE 

Flag Meanings 



Disp Flag Byte Contents 
OOIC ICEFLAGS Flag Bytes 



Hex 



0012 OOOC ICESUBJ 0000 0000 

0024 0018 ICESUBJQ 0008 0008 

0036 0024 ICEUECEX 0032 0020 

0016 0010 



Pattern 
Name 


Pattern 
Meaning 


ICESPEC 
ICEICX 
ICELGCN 

ICERSC2F 


Specific Accept 
ICX is Present 
Acquire is Logon 
Type 
1=ICERSC2B is a 




name 


ICESTAPR 


0=no name 
Shoulder Tap 



111 @NM00001 Slack 



LCCW (ISTLCCW) 

Dec 





Hex 





1 


2 1 3 





LCCWOP 

Operational 

Code-Control 


LCCWFLAG 
Flag Byte 


LCCWCNT 
Data Count 


4 


LCCWDATA 
Data Address or Immed. Data 



Alphabetical List of Fields in ISTLCCW 

Field Dec Hex Field Dec Hex 



LCCWCNT 0002 0002 LCCWDATA 0004 0004 LCCWFLAG 0001 0001 
LCCWOP 0000 0000 



Hex 




Bit 


Pattern 


Pattern 


Disp 


Flag Byte Contents 


Pattern 


Name 


Meaning 


0000 


LCCWOP Operation Code 
-Control 


1 

.1 

..11 nil 

..1 

...1 .... 

.... 1111 
11 


LCCWSI 

LCCWSD 

LCCWRWOP 

(oiNMOOOOl 
LCCWSOP 

LCCWCTL 

LCCWMODE 

LCCWTYPE 


Sess Init/Start 
Dialog Fig 
Sess Discon/End 
Dialog Fig 
Read/Write 
Operation Code 
Reserved 

Special Operation 
Like Erase or 
Read Cont 
Control Type 
Mode Type 
Operation Type 


0001 


LCCWFLAGFlog Byte 


..1 

...1 .... 

.... '..'{. 
1 


LCCWCD 
LCCWCC 
LCCWCKPT 

LCCWNTVC 

LCCWIDAT 

LCCWLSI 

LCCWPER 
LCCWRFI 

LLCWACI 


Chain Data 
Chain Command 
Suppress 3705 Check 
Point Record 
Do not Perform 
Valchek 
LCCWDATA 
Contains Data 
LCCW Synch 
Indicator 
Post=Resp 
Request Feedback 
Indicator 

Addition Command 
Indicator 



LCCW (ISTLCCW) ( Continued) 



Constants in 


ISTLCCW 




Label 


Value 


Meaning 


LXDQ 


X'3B' 


Reset Device Queue 


LXEC 


X'4B' 


Reset at End of Command 


LXO 


X'5B' 


Reset Orderly 


LLCWPRGE 


X'6B' 


Purge 


LWH 


X'OF' 


Write Header Indi. 1st Block 


LWRVI 


X'lF- 


Write RVI 


LWNA 


X'2F' 


Write Negative Ack 


LWAA 


X'3F' 


Write Alternate Ack 


LWPLG 


X'5F' 


Write Ack Leading Graphics 


LWNLG 


X'6F' 


Write Nack Ledaing Graphics 


LSMDE 


X'4F' 


Set Mode 


LIFBM 


X'TF' 


Indie 1st Block of Message 


LTEST 


X'FE' 


Test LCCW 


LPRMPT 


X'13' 


Preempt LCCW 


LRSTR 


X'43' 


Restore LCCW 


LEXEC 


X'FF' 


Special Control Operation 


LREAD 


B'lO' 


Read Type LCCW 


LWRITE 


B'Or 


Write Type LCCW 


LCNTRL 


B'lT 


Control Type LCCW 


LRESET 


B'lOir 


Reset Commands 


LTIC 


X'08' 


Logical Tic 


LWR 


B '00000 r 


Write Conversational 


vm 


B'oooior 


Write Block 


LWM 


B'ooioor 


Write Message 


Lwr 


B'OOllOT 


Write Transmission 


LEWM 


B'OnOOT 


Erase/Write Message 


LEWr 


B'oiiior 


Erase/Write Transmission 


LEAU 


B'oiooor 


Erase All Unprotected 


LRB 


B'ooono' 


Read Block 


LRM 


B'OOlOlO' 


Read Message 


LRT 


B'ooino' 


Read Transmission 


LRMOD 


B'OlOOlO' 


Read Modified 


LRBUF 


B'OIOIIO- 


Read Buffer 


LRCONT 


B'OllOlO' 


Read Continuous 


LRPEP 


B'oniio' 


Read Perpetual 


LCPYM 


B'loioor 


Copy Message 


LCPYT 


B'loiior 


Copy Transmission 


LD 


X'23' 


Disconnect 


LDEC 


X'33' 


Disconnect with End of Call 


LEOC 


X'53' 


End of Call Command 


LXEL 


X'OB' 


Reset Error Lock 


LXC 


X'lB' 


Reset Conditional 


LXI 


X'2B' 


Reset Immediate 


LC 


X'03' 


Contact 


LWPA 


X'FD' 


Write Positive Ack 


LMT 


B'lr 


Transmission Mode 


LMS 


B'OO' 


Special Mode like Conv, EAU 


LMB 


B'or 


Block Mode 


LMM 


B'lO- 


Msg or Continuous Mode 



LCCW (ISTLCCW) ( Continued) 

Constants in ISTLCCW (Continued ) 

Following Equates for - Port Solicitor (Dial) 

Port Solicitor Command Codes 

Label Value Meaning 

PSOL X'FE' Special Port Solicitor Command 

STCTL X'Or Start Control 

RESTCTL X'02' Reset & Control - Redrive 

STIPUT X'03' Start Input 



Following Equates for SDLC Support 
Label Value Meaning 



LCCHOLD 


X'01' 


Hold 


LCCRHOLD 


X'02' 


Release Hold 


LSEND 


X'Fl' 


Send 


LCLEAR 


X'F2' 


Clear 


LCRUD 


X'F3' 


Clear, Unbind 


LCRUDNFY 


X'F4' 


Clear, Unbind, Notify 


LNFY 


X'F5' 


Notify 


LRELCB 


XT6' 


Release CB 


LRESTSR 


X'F7' 


Resetsr 


LCLRNFY 


X'F8' 


Clear/Notify 


LCHPUR 


X'F9' 


Purge 


LCCWSiZE 


8 


LCCW size 


LRDS 


X'FF' 


Record dev stats command 


LQUiS 


X'FE- 


Quiesce Command 



LCPB 


(ISTLC 

Hex 


4 
8 

C 
10 
14 
18 
IC 
20 

24 
28 

Or 

4 

Or 
C 


:pb) 








Dec 





1 


2 


3 





LCPTYPE 
Type Code 


LCPLNGTH 
Length In 
Bytes 


LCPFLAGS 
Flag Byte 


LCPMNRCD 
LCP Minor 
Rejection Code 


4 


LCPCHAIN 
APS Chain 


8 


LCPRUCNT 
Number of RU 
for this LCPB 


LCPFLAG2 
Second Flag 
Byte 


LCPSEQ 
Outbound Sequence Number 


12 


LCPCID 
Communication ID 


16 


LCPNXLCW 
ADDR Next LCCW 


20 


LCPFDBA 
BTU Address 


24 


LCPTLBAD 
Address of TLB 


28 


LCPFC 
Sequence Num 


SN 

ber First BU 


LCPFSNCH 
1st SEQ Number in Ru Chain 


32 


LCPRSV03 
Reserved 


LCPFLG1 

Flogs 


LCPRRCCT 
Count of 
Responses 
Received 


LCPRRCNT 
Count of 
Responses 
Requested 


36 


LCPFLCCW 
Internal DOS TPIOS Pointer to First LCCW- 


40 


LCPLCCW 
First LCCW 




g LCPCHAIN 




4 


First Byte of 
LCPCHAIN 






g LCPCID 




12 


LCPSA 
Source ident 


F 
fication 


LCPDAF 
Destination Identification 



LCPB (ISTLCPB) (Continued) 



























Dec Hex 





1 


2 


3 






Or 


g LCPFLCCW 
















36 24 






LCPUBFSB 
Unbind FSB Address 












Or 


g LCPLCCW 
















40 28 






LCPRSTQA 


















Reset LCPB Queue Header 










44 2C 






LCPPABA 
















PAB Pol 


nter 












Or 


g LCPPABA 
















44 2C 






LCPRPHA 
RPH Pointer 












Or 


g LCPRPHA 
















44 2C 


First Byte of 








LCPPABA and 
















LCPRPHA 


ST LCPB 












Alphabetical 


List of F 


ields in 




Field Dec 


Hex 


Field 


Dec 


Hex 


Field 


Dec 


Hex 


LCPCHAIN 0004 


0004 


LCPLCCW 


0040 


0028 


LCPRUCNT 


0008 


0008 


LCPCID 0012 


OOOC 


LCPLNGTH 


0001 


0001 


LCPSAF 


0012 


OOOC 


LCPDAF 0014 


OOOE 


LCPMNRCD 


0003 


0003 


LCPSEQ 


0010 


OOOA 


LCPFDBA 0020 


0014 


LCPNXLCW 


0016 


0010 


LCPTLRAD 


0024 


0018 


LCPFIAGS 0002 


0002 


LCPPABA 


0044 


002C 


LCPTYPE 


0000 


0000 


LCPFIAG2 0009 


0009 


LCPRPHA 


0044 


002C 


LCPUBFSB 


0036 


0024 


LCPFLCCW 0036 


0024 


LCPRRCCT 


0034 


0022 








LCPFLGl 0033 


0021 


LCPRRCNT 


0035 


0023 








LCPFOSN 0028 


OOIC 


LCPRSTQA 


0040 


0028 








LCPFSNCH 0030 


001 E 


LCPRSV03 


0032 


0020 








Flag Meanings 
















Hex 






Bit 




Pattern 


Pattern 


Disp Flag Byte 


Conten 


J 


Pattern 




Name 


Mean- 


ng 


0002 LCPFLAGS 


Flag By 


te 


1 

.1.. .. 




LCPLOGIC 
LCPCBLK 


LCP Logic Error 
LCP Control Block 














Error 










..1. .. 




LCPFBIND 


Free Block 
Indicator 








...1 .. 




LCPRJEO. 


LCPB Rejected 




















FIc 


g 





LCPB (ISTLCPB) (Continued) 
/ Flag Meanings (Continued) 



Disp Flog Byte 



0009 LCPFLAG2 



First Byte of 
LCPCHAIN 

Second Flag Byte 



First Byte of 
LCPPABA and 
LCPRPHA 
LCPFLGl Flags 



Bit 


Pattern 


Pattern ■ 


Pattern 


Name 


Meaning | 


........ 


LCPCRFLG 


Rejected Contact 
Request 


.... 1... 


LCPMDRST 


LCP has been reset 


1.. 


LCPRESET 


Reset Request LCP 


1. 


LCPDTRCE 


Device Trace 
Require 


1 


LCPREQOK 


Request Handled 
as NOOP, 
Completion O.K. 


1 


LCPCHNG 


Gate Bit 


1 


LCPPRFLG 


Pacing Required 


.1 


LCPASYN 


Asynchronous LCPB 


..1 


LCPRSTRT 


Restart LCPB 


...1 .... 


LCPTLBPI 


TPIOS Block LCCW 


.... 1... 


LCPFIDO 


FIDO TH 
Indicator for Record 


1.. 


LCPCPURG 


Request may cause 
Following Requests 
to be Purged 


1. 


LCPTPiCB 


LCPB owned by 
TPIOS 


1 


LCPSPURG 


Request Subject 
to Purging due fo 
Prior Exception 


1 


LCPFTYPE 


Feedback Type 


1 


LCPRSV04 


Reserved for 
Alignment 


.1 


LCPINTER 


Internal LCPB 


..1 


LCPREDRV 


LCPB is for 
Redrive 


...1.... 


LCPSTLB 


TLB not to be 
Freed 


.... 1... 


LCPDIRPT 


Direct Post 


ni 


LCPRSV05 


Reserved 



LCPB (ISTLCPB) (Continued) 
Constants in ISTLCPB 



Constants for LCPTYPE 



LCRPHFT 


BT 


LCPABFT 


B'O' 


LCPBFIRM 


X'lO' 


LCPBTERM 


X'll' 


LCTYPE 


X'04' 


LCPCLACB 


X'04' 


PLCPTYPE 


X'28' 


LCPETYPE 


X'40' 


Minor Return Codes 


LCMCRSTR 


X'F7' 


LCPMNEW 


X'02' 


LCPMNPF 


X'03' 


LCPMNAS 


X'04' 


LCPMNCL 


X'06' 


LCPMNVD 


X'07' 


LCPMNTF 


X'lO' 


LCPMNSF 


x'or 


LCPMNTS 


x'lr 


LCPMNAP 


X'OA- 


LCPMNPR 


X'OB' 


LCPMNRE 


X'OC 



Meaning 



LU Failed, CLSDST, Sched Lost Term, OPNDST may 

be tried 

Term Received, CLSDST, Sched Lost Term 



LCPB from Close ACB 
Purge LCPB Type ID 
Extended LCPB Type ID 



Minor RC for Resetsr 

Early Warning, Recovery in Progress 

Perm. I/O Failure 

Auto Network Shutdov/n 

Close/CLSDST Occured 

Vary Deactivate 

Temp Record Device Failure 

Temp Basic Failure 

Terminate Self 

Appl. Issued Clear 

Preempt 

Restore 



NCB 


(ISTNC 


^ 










Dec 


Hex 


4 
8 
C 

10 
14 

18 
IC 
20 
24 

2C 





1 


2 


3 





NCBTYPE 
Control block 
type code 


NCBLNGTH 
Length in bytes 


NCBDAF 
ID of destination 


4 


NCBRDTE 
Address of RDT entry 


8 


NCBTSKID 
Task ID 


12 


NCBNSNA 
Address of next scheduloble node 


16 


NCBFMCBA 
Address of first FMCB 


20 


NCBNCBA 

CID of next same/lower 

level node 


NCBNCSL 
CIDof next same/level 
node 


24 


NCBFLAGS 
Common NCB flags 


28 


NCBRVPTl 
Count of lost trace records 


NCBLTRC 
Lost trace record count 


32 


NCBFMCBP 
Address of port solicitor FMCB 


36 


NCBDEVCH 
Node Dev Chor 


44 


NCBSWDAF 
Real Network Address of 
Term in SW. Subarea 


NCBRSNA)! 
Reserved 




O 


g NCBFLAGS 




24 


18 


NCBCSTAT 
Connection 
status flag 


NCBFRAS 
RAS flag 






O 


gNCBFRAS 






25 


19 


NCBFTRIO 
l-O trace active 
this node 






Org NCBFTRIO 






25 


19 


NCBFLTIO 

i-O trace active 

this node 





NCB (ISTNCB) (Contmued) 
Dec Hex 



OrgNCBFlAGS + 2 



Org NCBFLAGS + 3 



NCBFLAGl 
NCB flags 



NCBNMLLN 
Number of lower 
level nodes 



Alphabetical List of Fields in ISTNCB 
Field Dec Hex Field 



Dec Hex 



Field 



Dec Hex 



NCBCSTAT 


0024 


NCBDAF 


0002 


NCBDEVCH 


0036 


NCBFIAGS 


0024 


NCBFLAGl 


0026 


NCBFLTIO 


0025 


NCBFMCBA 


0016 


NCBFMCBP 


0032 


Flag Meanings 




Hex Flag Byte 


Disp 





0018 NCBFRAS 0025 0019 

0002 NCBFTRIO 0025 0019 

0024 NCBLNGTH 0001 0001 

0018 NCBLTRC 0030 00 IE 
OOIA NCBNCBA 0020 0014 

0019 NCBNCSL 0022 0016 
0010 NCBNMLLN 0027 OOIB 

0020 NCBNSNA 0012 OOOC 



NCBRDTE 

NCBRSVOl 

NCBRVPTl 

NCBSWDAF 

NCBTSKID 

NCBTYPE 



0004 0004 

0046 002 E 

0028 00 IC 

0044 002C 

0008 0008 

0000 0000 



OOIA NCBFLAGl NCB Flags 



Bit 


Pattern 


Pattern 


Pattern 


Name 


Meaning 


1 


NCBSNAl 


Old Node 


.1 


NCBCONF 


Node Sick flag 


..1. ... 


NCBRSTRT 


Recovery in 
progress 


...1 ... 


NCBRSYNC 


C/R Resynch on 
first I/O required 
1=YES 


.... 1.. 


NCBTTF 


C/R Ignore 
Trickle Traffic, 
1=YES 


1. 


NCBFORCE 


Forced Deact 
in progress 


1 


a NMOOOOl 


Reserved 



Constants in ISTNCB 



Label 


Value 


Meaning 


LDTYPE 


X'07' 


Type Code for LDNCB 


ICTYPE 


X'06' 


Type Code for ICNCB 


DNTYPE 


X'05' 


Type Code for DNCB 


HCTYPE 


X'14' 


HCNCB Type 


CaYPE 


X'15' 


CCNCB Type Code 


LUTYPE 


X'25' 


LUNCB Type Code 


NCNOTRC 





No Trace Required. 



NCSPL (ISTNCSPL) 



Dec 


Hex 


10 
14 

18 
IC 

24 

2C 
30 
34 





1 


2 


3 





Q NM00009 


16 


(a)NM00011 
Reserved 


NCSPLVCD 
Verb Code 


NCSPLVBF 
Verb Modifier Flags 


20 


NCSPLVFL 
Command Flags 


NCSPLVFl 
Special Proc 
Flags 


NCSPRMRC 
Purge Minor 
Return Code 
Field 


NCSIORC 
I/O or Restart 
Return Code 


24 


NCSPRRNPT 
Addr RN Entry for Line Trace 


28 


NCSPLRID 
ID = 'Nodename' 


36 


NCSPLLID 
Logon = 'Nodename' 


44 




NCSDLI 
Offhook IC 


D 


48 




NCSCRCMD 

C/R i/O command 

code 


NCSCRPID 
C/R Path ID 
(PID) 


52 


NCSPLRPT 
ID = 'Nodename' RDTE Address 



NCSPL (ISTNCSPL) (Continued) 
Dec Hex 



156 9C 



NCSPLLPT 
Logon/Logoff = 'Nodename' RDTE Addr 



NCSPLCMD 
3705 Control Command Codes 



NCSNCPEP 
EP Subchannel 
Addr 



NCSMSGSP 
Reserved for 
Message 
Surpression 



NCSPLUAD 
U = 'Unit Address' 



NCSCRFLG 
vAiscellaneous 
C/R Flags 



NCSPLWRE 
WTOR ECB 



NCSPLWRF 
WTOR Reply Area 



NCSPLRAD 
RDTE PTR for Allocate/Deallocate 



NCSIOCID 
Current CID for DAF Lock Held 



NCSPLWKA 
NCS Work Area Address 



NCSPLCVT 
Pointer to VTAM CVT 



NCSPLRPH 
Pointer to RPH 



NCSPL (ISTNCSPL) (Continued) 



Dec Hex 
164 A4 



NCSDLRSN 
Dial Reason 
Codes 



NCSPLPLl 
Vary Flags 



NCSPLECB 
ECB for Vary PGS 



NCSPLFSB 
Address of USS-FSS FSB or RU 



NCSPUiCR 
Address RDTE for CR 



NCSPIPL2 
Vary F logs 



NCSPU=L5 
Flag Byte 



NCSPlfL3 
Flag Byte 



NCSPLFL4 
Flag byte 



NCSPLOLN 
Length O/B RU 



NCSPLPl 
Addr Vary PAB 



NCSPLP2 
Addr D/l/R PAB 



NCSPLP3 
Addr ERP PAB 



NCSPLSPL 
Addr Assoc. NCSPL 



NCSPLWEL 
Addr Post RPH 



NCSPLRRP 
Addr Remote RN RDTE in Local RDT 



NCSPLRUO 
Addr O/B RU 



NCSPL (ISTNCSPL) (Continued) 
Dec Hex 



NCSPLRUI 
Addr Buffer for l/B RU 



NCSPLAPP 
Addr NCSPL Appendage 



NCSRNAME 
Rname=from Vary Activate 



NCSPLSQN 
Sequence=Nr. for Response 



NCSPLGID 
Binary Rep of 
GID Value 



NCSPLMID 
Logmode = 'Modename' 



NCSPLNSN 
RDTENSNEAatCLSDST 



N CSS ENS E 
Sense 



NCSCPWPT 
Address of CPWA 



NCSMGLPT 
PTR to USS/FSS MSG Param List 



NCSUFMCB 
Pointer to SSCP-LU FMCB 



NCSPLRH 
Request RH 



NCSPLPID 
Binary Rep of 
PID Value 



NCSPLRTY 
Type from 
RTGOH RU 



NCSPL MSTN CPSL) (Continued) 
/ Dec Hex 






1 


2 


3 


NCSCRDTE 
Pointer to RDTE being processed for -C/R I/O 


NCSCRMSK 
Flags for C/R Check Pointing 




NCSPLSID 
Message Routing Information 





ORG(a) NM00009 



NCSPFX 
Queue Element Prefi> 



/ 



(H)NM00010 



NCSCRWKA 
Pointer to Work Area for C/R I/O 



NCSPL (ISTNCSPL) (Continued) 



12 3 



Org NCSPLVBF 



First Byte of 
NCSPLVBF 



Org NCSPLVBF+1 



Second Byte of 
NCSPLVBF 



Org NCSPLCMD 



NCSCAADA 
RH Flags 



Org NCSPLCMD+1 



NCSCMBD 
Command Field 



Org NCSPLRAD 



NCSLSCMD 
Line Sched 
Command Type 



NCSPLRCD 
Hex Value for 
Line Sched Param 



OrgNCSIOCID 



NCSPLCID 
Current CID for Daf Lock held 



Org NCSPLCID 



NCSPLSAF 
Source Address 



NCSPLDAF 
Destination Address 



Org NCSSENSE 



NCSSNSl 
Sense Data 
Major Code 


NCSSNS2 
Sense Modifier 
Byte 


NCSSENS2 
User Sense Data 



NCCSPL (ISTNCSPL) (ConMnued) 





Hex 

o 








Dec 


1 , 1 . 


3 




IG NCSCRMSK 






268 


IOC 


NCSCHKPT 
Flags for Items check pointec 








O 


IG NCSCHKPT 








268 


IOC 


First byte of 
NCSCHKPT 








o 


IG NCSCHKPT+1 








269 


10D 


Second byte of 
NCSCHKPT 








ORG NCSCRMSK+2 








270 


lOE 


NCSCRMOD 
New values for 
items check- 
pointed not 
obtained from 
RDTE 






ORGNCSPLSID 






271 


lOF 


NCSPLSTA 
Status flag 
byte 




ORG NCSPLSID+1 




272 


110 


NCSPLPHD 
PO Header if NCSPLPO = 01 







^G NCSPLPHD 






272 


110 


NCSPLNID 
Console ID if 
NCSPLPO = 








O 


?G NCSPLSID+5 






276 


114 


NCSPLPDB 
Pointer to PO ACDEB Prefix 



NCSPL (ISTNCSPL) rContinued) 



Alphabetical List of F 


ields in 


ISTNCSPL 












Field 


Dec 


Hex 


Field 


Dec 


Hex 


Field 


Dec 


Hex 


@ NM00009 


0000 


0000 


NCSPLDAF 


0150 


0096 


NCSPLRPT 


0052 


0034 


@NM00010 


0000 


0000 


NCSPLECB 


0164 


00A4 


NCSPLRRP 


0204 


OOCC 


@NM00011 


0016 


0010 


NCSPIPLI 


0176 


OOBO 


NCSPLRTY 


0263 


0107 


NCSCHKPT 


0268 


OlOC 


NCSPLFL2 


0177 


OOBl 


NCSPLRUI 


0212 


00D4 


NCSCMDA 


0060 


003C 


NCSPLFL3 


0178 


00 B2 


NCSPLRUO 


0208 


OODO 


NCSCMDB 


0061 


003D 


NCSPLFL4 


0179 


00 B3 


NCSPLFSAF 


0148 


0094 


NCSCPWPT 


0248 


OOFS 


NCSPUL5 


0181 


00 B5 


NCSPLSID 


0271 


OlOF 


NCSCRCMD 


0050 


0032 


NCSPLFSB 


0168 


00A8 


NCSPLSPL 


0196 


00C4 


NCSCRDTE 


0264 


0108 


NCSPLGID 


0230 


00 E6 


NCSPLSQN 


0228 


00 E4 


NCSCRFLG 


0067 


0043 


NCSPILID 


0036 


0024 


NCSPLSTA 


0271 


OlOF 


NCSCRMOD 


0270 


OlOE 


NCSPLLPT 


0056 


0038 


NCSPLUAD 


0064 


0040 


NCSCRh/6K 


0268 


OlOC 


NCSPLMID 


0232 


00 E8 


NCSPLVBF 


0018 


0012 


NCSCRPID 


0051 


0033 


NCSPLNID 


0272 


0110 


NCSPLVCD 


0017 


0011 


NCSCRWKA 


0012 


OOOC 


NCSPLNSN 


0240 


OOFO 


NCSPLVFL 


0020 


0014 


NCSDLID 


0044 


002C 


NCSPLOLN 


0182 


00 B6 


NCSPLVFl 


0021 


0015 


NCSDLRSN 


0180 


00B4 


NCSPLPDB 


0276 


0114 


NCSPLWEL 


0200 


00C8 


NCSIOCID 


0148 


0094 


NCSPLPHD 


0272 


0110 


NCSPLWKA 


0152 


0098 


NCSIORC 


0023 


0017 


NCSPLPID 


0231 


00E7 


NCSPLWRE 


0068 


0044 


NCSLSCMD 


0144 


0090 


NCSPLPl 


0184 


00B8 


NCSPLWRF 


0072 


0048 


NCSMGLPT 


0252 


OOFC 


NCSPLP2 


0188 


00 BC 


NCSPRMRC 


0022 


0016 


NCSMSGSP 


0063 


003F 


NCSPLP3 


0192 


OOCO 


NCSRNAME 


0220 


OODC 


NCSNCPEP 


0062 


003E 


NCSPLRAD 


0144 


0090 


NCSRRNPT 


0024 


0018 


NCSPFX 


0000 


0000 


NCSPLRCD 


0145 


0091 


NCSSENSE 


0244 


00F4 


NCSPLAPP 


0216 


00D8 


NCSPLRCR 


0172 


OOAC 


NCSSENS2 


0246 


00F6 


NCSPLCID 


0148 


0094 


NCSPLRH 


0260 


0104 


NCSSNSl 


0244 


00F4 


NCSPLCMD 


0060 


003C 


NCSPLRID 


0028 


OOIC 


NCSSNS2 


0245 


00F5 


NCSPLCVT 


0156 


009C 


NCSPLRPH 


0160 


OOAO 


NCSUFMCB 


0256 


0100 



NCSPL (ISTNCSPL) (Continued) 

Flag Meanings (Continued) 

) Hex 

Disp Flag Byte Contents 



00B2 NCSPlf L3 Flag Byte 



00B3 NCSPIPL4 Flag Byte 



00B5 NCSPLf L5 Flag Byte 



Bit Pattern 

Pattern Name 



Pattern 
Meaning 



1, NCSPLVIS Vary IMM Start 

Caller of CVP 

1 NCSPLVIT Vary IMM Term 

Caller of CVP 

1 NCSPLMOM ERP Caused V 

Failure of Higher Node 
.1 NCSEPP 1=EP Subchannel 

Present 
..1 NCSPIANS On for Act in Answer 

Mode Off for Act in 

Non -Answer Mode 
...1 .... NCSGID On for Path with GID 

Parm 
.... 1... NCSPID On for Path with RID 

Parm 
1.. NCSANS On for Activate with 

ANS Parm 

1. NCSFINAL Final Parm Exists 

1 NCSEND End Parm Exists 

1 NCSDLNID ID Present in 

NCSPL -Off 

.1 NCSPLRSO Reset Only 

..1 NCSPLVID OrigCMDwas 

Modify Dump 
...1 .... NCSDSPE Display Every 

.... 1... NCSDSPA Display Act 

1.. NCSDSPI Display Inact 

1. NCSDSPN Display None 

1 NCSPL2AP Second ACTPU to 

320X 

1 NCSSCPPS SSCP Work Area in 

PVT Storage 

.1 NCSSDLK On-SDLC Link 

Processed 

..1 NCSFORCE Forced Deact 

in progress 

...1 1111 @NM00013 Reserved 



First Byte of 1. 


NCSVBFOl 


Unused 


NCSPLVBF . 1 


NCSMSG 


Modify Msg, 
ID-XXXXXXXX 




1 NCSVBF03 


Modify MSG sup 




.1 .... NCSVBF04 


Type=VTAM 




.. 1... NCSVBF05 


Linetrace=l 




.. .1.. NCSVBF06 


I/O Trace=l 




.. ..1. NCSVBF07 


Buffer Trace=l 




1 NCSVBF08 


Modify Tprint 


Second Byte of 1 . 


NCSVBF09 


Modify Test 


NCSPLVBF .1 


NCSVBFIO 


Modify Trace=No 




1 NCSVBFll 


Vay Internal Only & 
Modify Trace =Yes 



NCSPL (ISTNCSPL) (Continued) 



Flag Meanings (Continued) 



Hex 

Disp Flag Byte 



0014 NCSPLVFL Command Flags 



0015 NCSPLVFl Special Proc Flags 
003C NCSCMDA RH Flags 

0043 NCSCRFLG Miscellaneous C/R 1 
Flags 



Bit 


Pattern 


Pattern 


Pattern 


Name 


Meaning 


...1 ... 


NCSVBF12 


Vary immediate & 
Modify Netsol=No 


.... 1., 


NCSVBF13 


Modify Netsol=Yes 




NCSVBF14 


Vary Logon & 
Modify Change 


^ 


1. NCSVBF15 


Vary Deactivate & 
Vary Normal Close 
(ERP) 




,1 NCSVBF16 


Vary Activate & ERP 
Request & Modify 
Dump 


1 


NCSVNCSA 


NCSPL is Active 


.1 


NCSVDEL 


Delete NCSPL 


..1. ... 


NCSVSTAT 


indicate NCSPL was 
not Getmained 


...1 ... 


NCSDCONT 


Do Disconact 


.... 1.. 


NCSABCON 


Do Abandon 
Connection 




NCSDACLK 


Do Activate Line 


1 


11 NCSRSV02 


Reserved 


1 


NCSOVFMC 


Purge only Vary's 
FMCD 


1 


NCSPL5YS 


On-System Off-FM 


.1 


NCSPLCTL 


On-Control Off-Date 


..1. ... 


NCSPLSYN 


On=Synchr Off- 
Asynch 


...1 ... 


NCSPLFLO 


On-with Flow 
Off-against Flow 


.... 1.. 


NCSPLUFM 


On=Unformatted 
RU, Off=formatted 


Ill (a)NM00010 


Reserved 


1 


NCSPLWRM 


Command specified 
warm pa ram, l=Yes 


.1 


NCSPLCLD 


Command specified 
cold param, 1 =Yes 


..1. ... 


NCSFMCLD 


370X responded cold 
to ACTPU(ERP), 
1=YES 


...1 ... 


NCSFMERP 


370X responded ERP 

toACTPU(ERP), 

f^Yes 



NCSPL MSTNCSPL) (Contmued) 



Flag Meanings ^Continued) 



Hex Flag Byte Contents 

Disp 



First Byte of 
NCSCHKPT 



Second Byte of 
NCSCHKPT 



Bit 


Pattern 


Pattern 


Pattern 


Name 


Meaning __ 


1... 


NCSCRDSE 


0=C/R data set does | 
not exist or is null 
1=C/R data set 
exists and is not null 


1.. 


NCSOPRQU 


Operator requests 
REIPL, l=Yes 


1. 


NCSUSRNF 


Early warning purge 
has already occurred, 
1=yes 


1 


NCSSTCMD 


Activate is a result 
of Start VTAM 
command, l=Yes 


1 


NCSACTV 


Active/Inactive 
status changed 
l=Yes 


.1 


NCSPACTV 


Port Act/Inactive 
Status changed 
l=Yes 


..1 


NCSPOLD 


Poll Delay Value 
changed, l=yes 


...1 


NCSNRPL 


Negative response 
to Poll Limit Value 
changed, l=Yes 


1... 


NCSESLM 


Session Limit Value 
changed, 1 =Yes 


1.. 


NCSDTRLM 


Device Transmission 
Limit Value changed, 
l=Yes 


1. 


NCSLGAPL 


Application Controller 
Nome (LOGAPPL) 
changed, l=Yes 


1 


NCSLGMOD 


Logon Mode 
(LOGMODE) changed 
l=Yes 


1 


NCSANSMD 


Answer Mode Status 
changed, l=Yes 


.1 


NCSCUA 


CUA Value changed, 
l=Yes 


..1 


NCSRNME 


RNAME value changed 
l=Yes 


...1 


NCSPTUSE 


Path Use/Nouse 
Status changed, 
1=Yes 


.... nil 


NCSRSVDl 


Reserved 



NCSPL (ISTNCSPL) (Continued) 



Flag Meanings (Continued) 



Hex Flag Byte Contents 
Disp 



Pattern 
Name 



Pattern 
Meaning 



OlOE NCSCRMOD New Values for 1 NCSAIMOD Active/inactive 

Items checkpointed Status, l=Active 

not obtained .1 NCSPTMCD Port Act/lnact 

from Status, l=Active 

..11 1111 NCSRSVD2 Reserved 

OlOF NCSPLSTA Status Flag 1111111. NCSRSVD4 Reserved 

Byte 1 NCSPLPO 0=Console ID 

follows, 

l=Program Operator 

Header follows 



NCSPL (ISTNCSPL) (Continued) 



Qjnstants in 1 


STNCSPL (Continued) 


Label 


Value 


Meaning 


Constants for Modify Command 


Modifiers-stored in NCSPLVBF 


NCSMDUM 


X'0001' 


Dump 3705 


NCSMCHA 


X'0004" 


Change 


NCSMNSY 


X'0008' 


Netsol = Yes 


NCSMNSN 


X'OOIO' 


Netsol = No 


NCSMTRY 


X'0020' 


Trace = Yes 


NCSMVTRY 


X'2020' 




NCSMVTRN 


X'2040' 




NCSMTRN 


X'0040' 


Trace = No 


NCSMTPR 


X'OIOO' 


Trace Print 


NCSMTST 


X'0080' 


Modify Test 


NCSDPF 


X'OOOO' 


Potential Fail 


NCSDSTRT 


X'OOOl' 


Dial Start 


NCSDOHl 


X'0002' 


Offhook 1 


NCSDOH2 


X'0004' 


Offhook 2 


NCSDDF 


X'OOIO' 


Dial Failed 


NCSDLKS 


X'0008' 


Link Start 


NCSDLKC 


X'0020' 


Link Completion 


NCSDHU 


X'0040' 


Hangup 


NCSDLK 


X'0080' 


Deallocate 


NCSDGIVE 


X'OIOO' 


Give 


NCSDINOP 


X'0200' 


Inop 


NCSDLRST 


X'0400' 


Recovery SW Links after RN Failure 


NCSEERRA 


X'OOOl' 


ERP Request 


NCSECLOR 


X'0002' 


Vary Normal Close Request 


NCSEDACT 


X'0004' 


ERP Deactivate Request 


NCSERSTR 


X'0008' 


RSTRT Entry from DLR Proc 


NCSVFORC 


X'0802' 


Forced Deact 


NCSVRACT 


X'1002' 


Deact and React 


Purge Minor Return Codes Constants- Stored in NCSPRMRC 


NCSAPABN 


X'05' 


Application Abend 


NCSCLDST 


X'06' 


Close Dest Occured 


NCSDDISC 


X'08' 


Dial Disconnect Occured - Conn no Longer Available 


NCSBTHEX 


X'09' 


Buffer Threshold Exceeded 


I/O or Restart Return Codes Constants-Stored in NCSIORC 


NCSIOSUC 


X'OO' 


I/O Successful 


NCSIOERR 


X'04' 


I/O Error 


NCSIOPRG 


X'08' 


I/O Purged 


NCSRSSUC 


X'OO' 


Restart Successful 


NCSRSERR 


X'04' 


Restart Error 


NCSVAIPL 


X'OO' 


IPL No Restart on Vary Actv 


NCSVANRA 


X'lO' 


IPL Successful, no Restart Available on Vary Active 


NCSVAWMF 


X'08' 


Worm Start Failure for Vary Activate 


NCSVAIPF 


X'OC 


IPL Failed on Vary Activate 


NCSDSIA 


X'14' 


Invalid Address Specified on Display Storage Cmnd 


NCSVAISZ 


X'08' 


NCP Size too Large 


NCSIPLSC 


X'OO' 


IPL Successful 


NCSiOER 


X'OC 


I/O Error on Remote IPL 


NCSNCPAC 


X'04' 


Remote NCP already active 


NCSNCRPF 


X'70' 


Remote Power Off 


NC5CRIOS 


X'30' 


Successful I/O 



I 



NCSPL (ISTNCSPL) (Continued) 



Constants in 


ISTNCSPL (Conti. 


lued) 


Label 


Value 


Meaning 


NCSCRION 


X'34' 


Null D.S. opened 


NCSCRIOF 


X'38' 


Failure on I/O 


Constants for 3600 Support 




NCSES 


X'OOOl' 


End Session ^ 


NCSBF 


X'0002* 


Bind Failure' 


NCSUF 


X'0004' 


UnbindFailure 


NCSINIT 


X'OOOl' 




NCSTERM 


X'0002' 




NCSTPPST 


x'ooor 


TPPST Command 


NCSII 


X'0002' 


IPL Init Command 


NCSIT 


X'0004' 


IPL Command 


NCSIF 


X'0008' 


IPL Final Command 


NCSDI 


X'OOIO' 


Dump Init Command 


NCSDT 


X'0020' 


Dump Text Command 


NCSDF 


X'0040' 


Dump Final Command 


NCSCON 


X'0080' 


Contact Command 


NCSDICON 


X'0100' 


Discontact Command 


NCSMSFMD 


X'0200' 


Send FMD 


NCSSEND 


X'0400' 


Send 


NCSPURGE 


X'0800' 


PAB Purge 


NCSMSSUP 


X'2000' 


Constants for MSG Sup 


NCSCRDS 


X'3023' 


Record Dev Stats Command 


NCSCQUIS 


X'FOIA' 


Quiesce Command 


NCSSNUSS 


X'381F' 


Send USS Message 


NCSNC 


X'04' 


Not Contacted 


NCSLD 


X'OO' 


Contacted Loaded 


NCSNLD 


X'OC 


Contacted Needs Load 


NCSNCD 


X'08' 


Not Contacted Due to Deact 


NCSNCE 


X'lO' 


Not- Contacted Due to ERP 


NCSNFME 


X'24' 


'Negative FME 


Constants for lORC for Display 


Storage 


NCSDSDEA 


X'OC 


Prior Deact 


NCSDSFAL 


X'04' 


Fail Other than Prior Deact 


Type Codes for Configuration Restart 


NCSCTRLM 


X'Ol' 


Change Dev Trans Limit 


NCSCNPOL 


X'02' 


Change Neg Poll Resp Limit 


NCSCSESS 


X'03' 


Change Session Limit 


NCSCPOLL 


X'04' 


Change Line Serv Seek Pause 


FM Data Command Codes 




NCSAPU 


X'DOOr 


Act Phys 


NCSCDPU 


X'D002' 


Deact Phys 


NCSCALU 


X'D003' 


Act Log 


NCSCDLU 


X'D004' 


Deact Log 


NCSCSDT 


X'D005' 


SDT 



NCSPL (ISTNCSPL) (Continued) 



Constants in ISTNCSPL (Contir 


lued) 


Label 


Value 


Meaning 


NCSCFME 


X'2006' 


Send Pos Resp 


NCSCEXCP 


X'2007' 


Send Neg Resp 


NCSCCON 


X'3008' 


Contact 


NCSCDCON 


X'3009' 


Discontact 


NCSCiPLI 


X'300A' 


IPL Init 


NCSCIPLT 


X'SOOB' 


IPL 


NCSCiPLF 


X'300C' 


IPL Final 


NCSCDUMI 


X'SOOD' 


Dump Init 


NCSCDUMP 


X'SOOE' 


Dump 


NCSCDUMF 


X'300F' 


Dump Final 


NCSCACTL 


X'3010' 


Act Link 


NCSCDACL 


X'30ir 


Deact Link 


NCSCSSV 


X'3012' 


Set State Vector 


NCSCNSP 


X'3013' 


NS Proc Error 


NCSCSTD 


X'3019' 


Set Time & Date 


NCSCSEP 


X'9014' 


Switch to EP 


NCSCSNC 


X'9015' 


Switch to NCP 


NCSCLSD 


X'3016' 


Line Sched Parm 


NCSCDS 


X'3017' 


Display Storage 


NCSCPWO 


X'3018' 


Remote Power Off 


NCSSNFMD 


X'SOIC 


Send FMD 


NCSCDIAL 


X'301A' 


Dial 


NCSCADIL 


X'301B' 


Abandon Dial 


NCSCEANS 


X'301D' 


Enable Ans Mode 


NCSCAANS 


X'301E' 


Abandon Ans Mode 


NCSCANA 


X'301F' 


Assign Net Address 


NCSCFNA 


X'3020' 


Free Net Address 


NCSCACON 


X'302r 


Abandon Connection 


NCSCSCV 


X'3022' 


Set Control Vector 


NCSCNCPPG 


X'FFFF' 


Purge 


New Values for NCSPLCMD 




NCSCLCND 


X'004r 


Load Conditionally 


NCSCUCND 


X'0042' 


Load Unconditionally 


NCSCRSRT 


X'0043' 


Restart 370X or Clus 


NCSDUCMD 


X'0044' 


Dump 370X 


NCSCERPP 


X'0045' 


Perform ERP Dump and Reload of 370X 


NCSDOUT 


X'0046' 


Dial Out 


NCSDCNT 


X'0047' 


Dial Contact 


NCSDABDN 


X'0048' 


Dial Abandon 


NCSDENAS 


X'0049' 


Dial Enable Answer 


Values for NCSCMDB 




NCSBFME 


X'06' 


Send POS Resp Command 


NCSBEXC 


X'07' 


Send Neg Resp Command 


Constants for D 


iai Reason Codes- stored In NCSDLRSN 


NCSDIRRD 


X'Ol' 


Redial 


NCSDLRQT 


X'02' 


Quit 



11-125 



NCSPL (ISTNCSPL) (ConHnued) 
Constants in ISTNCSPL (Continued) 



Meoning 



New Values for NCSIORC 



NCSLDAOK 


X'OO- 


NCSLDACT 


X'04' 


NCSLDCAN 


X'04' 


NCSLDIOP 


X'08' 


NCSLDNOG 


X'OC 


NCSDUCOM 


X'W 


NCSHALTD 


X'18' 


NCSUNREC 


X'lC 


NCSNOSTG 


X'20' 


NCSDOS 


X'OO' 


NCSDOF 


X'04' 


NCSDOP 


X'08' 


NCSDCS 


X'OO' 


NCSDCF 


X'OC 


NCSDAS 


X'OO' 


NCSDENSO 


X'OO' 


NCSDOFHR 


X'04' 


NCSDENSF 


X'08' 


New values for 


NCSPRM 


NCSFIRM 


X'lO' 


NCSEWRN 


X'lT 


Constants for Trace 


NCSACTLT 


X'0820' 


NCSDACLT 


X'0840' 


NCSCACLT 


X'301D' 


NCSCDCLT 


X'301E' 



Command Processed Success 
NCP Active-Load not Perf 
Reload Declined by Oper 
I/O Purged 
Command Failed 
Dump Complete 
CMD Rejected, Halt in Prog 
Command Unrecognized 
CMD Rejected, Insuff Storage 
Dial-Out Successful 
Dial-Out Unsuccessful 
Dial-Out Pending 
Dial-Contact Loaded 
Dial-Contact Failed 
Dial-Abandon Conn Complete 
Enable Answer Successful 
Offhook Required 
Enable Answer Fail 



Restart Successful Opendst Req 
Con Lost, Recov in Prog 



Activate Line Trace 
Deactivate Line Trace 
SSCP Act Line Trace 
SSCP Deact Line Trace 



Display Command Modifier Constants 
NCSDPATH X'OOOl' Paths 



NC5PL (NCSAPP) 



72 48 

76 4C 



88 58 

y 91 5B 

96 60 



ORg NCSAP8UE 



NCSAPSA 
Save area 



NCSAPECB 
ECB 



NCSAPTXT 
Dump data 



NCSAPEND 
High storage address 



NCSAPPAB 
BNN vary PAB address 



NCSRSV04 
Reserved 



NCSAPRU 
IPL CMD RU prefix 



NCSAPDAT 
Resp for dump, O/B load 



Alphabetical List of Fields in NCSAPP 
Field Dec Hex Field 



NCSAPBUE 0088 0058 
NCSAPDAT 0096 0060 
NCSAPECB 0072 0043 



NCSAPEND 0084 0054 
NCSAPPAB 0608 0260 
NCSAPRU 0091 005B 



NCSAPSA 0000 0000 
NCSAPTXT 0076 004C 
NCSRSV04 0088 0058 



NCSPL (NCSUS 


SRU) 








Dec Hex 





1 


2 


3 





NCSRULEN 
Length of RU 








NCSRUITS 
Starf of RU (Variable Length) 



Alphabetical List of Fields in NCSUSSRU 
Field Dec Hex Field 



NCSRUITS 0002 0002 



Constants in ISTNCSPL 



NCSRULEN 0000 0000 



Label 


Value 


Meaning 


Command Values for C/R F 


eld NCSCRCMD 


NCSCRWR 





Write to C/R Data Set 


NCSCROPN 


1 


Open C/R Data Set 


NCSCRCLS 


2 


Close C/R Data Set 


NCSCRDEL 


3 


Delete C/R Data Set Record 


NCSCROPQ 


4 


Operator Query 


NCSDCID 


1 


Console ID Indicator 


NCSCRIO 


X'0800' 


Indicates requests for VSAM I/O for C/R 


NCSCRVIO 


X'OCOO' 


VSAM I/O Operation 


General Constants 




NCSWASZ 


2032 


NCSPL Work Area size 


NCSRTGOH 


X'lOOO- 


VBF Value for Internal Command-RTGOH 


Constants for VERB Codes - 


Stored in NCSPLVCD 


NCSPLVCO 


X'OO' 


Error 


NCSPLVCl 


X'OT 


Vary 


NCSPLVC2 


X'02' 


Modify 


NCSPLVC3 


X'03' 


ERP 


NCSPLVC4 


X'04' 


Display 


NCSPLVC5 


X'05' 


Status to SM 


NCSPLVC6 


X'06' 


Internal CMD 


NCSPLVC7 


X'07' 


In it/Term Tusm 


NCSPLVC8 


X'08' 


Dial 


Constants for 


•ary Command Modifiers 


NCSVACT 


x'ooor 


Activate 


NCSVDEA 


X'0002' 


Deactivate 


NCSVLON 


X'0004' 


Logon 


NCSWPP 


X'0080' 


Vary Normal Cleanup Reqst 


NCSVIMM 


X'OOIO' 


Immediate 


NCSVINT 


X'0020' 


Internal Only 


NCSVALO 


X'0005' 


Activate with Logon 


NCSVDEI 


X'0012' 


Deactivate Immediate 


NCSVDII 


X'0032' 


Deactivate Immediate Internal Only 


NCSCNOTF 


X'FFF8' 


Notify Request 


NCSVANON 


X'0008' 


Ansv/er = On 


NCSVANOF 


X'0040' 


Answer =Off 


NQVPUSE 


X'OIOO' 


Path = Usable 


NCSVPNUS 


X'0200' 


Path = Not Usable 


NCSVINOP 


X'0400' 


Inoperative 
11-128 



PAB (ISTPAB) 



Dec 


Hex 






1 


2 


3 

















PABWQCHN 
CDS SWAP Field for NEQ&CHN 




8 


8 

c 


PABOFFST 
Offset from 
Control Block 


PABDVTA 
DVT Address 


12 


PABRPHFG 
Sched Flags and RPH 



Org PABWQCHN 



PABWEQA 
Work Element Queue Address 



Org PABWEQA 



First Byte of 
PABWEQA 



Org PABWEQA+1 



PABWEQP 
WKEL PTR 



Org PABWQCHN44 



PABCHAIN 
APS Chain 



Org PABCHAIN 



First Byte of 
PABCHAIN 



Org PABCHAIN+1 



PABCHNGP 
PSS Chain PTR 



PAB (ISTPAB) (Continued) 
















Dec Hex 





1 


2 


3 








Org PABRPHFG 












12 C 


PABFLAGS 
Scheduling 
Flags 










Org PABRPHFG 


fl 








13 D 


PABRPHA 
RPH Address 






Alphabetical List of Fields " 

Field Dec Hex 

PABCHAIN 0004 0004 
PABCHNGP 0005 0005 


n ISTPAB 

Field 

PABOFFST 
PABRPHA 


Dec Hex Field 

0008 0008 PABWEQP 
0013 OOOD PABWQCHN 


Dec 

0001 
0000 


Hex 

0001 
0000 



PABDVTA 0009 0009 PABRPHFG 0012 OOOC 
PABFLAGS 0012 OOOC PABWEQA 0000 0000 



Flag Meanings 



Hex 






Bit 


Pattern 


Pattern 


Disp 


Flag Byte 


Contents 


Pattern 


Name 


Meaning 


OOOC 


PABFLAGS 


Scheduling Flags 


1 

.1 

..1 

...1 .... 

]..*. .']'.'. 

L. 

1.. 

1. 

1 


PABAPYP 

PABPRIOR 
PABNORPR 

PABDYNAM 

PABSSN 

PABERLCK 

PABERRLK 

PABERLOK 

PABINHBT 

PABNODQ 


Application is a 
User ^it 

Immediate Priority 
Normal Priority - 
Rescheduolable 
Dynamic 
System Ser/ices 
PAB Error Lock Flag 
Error Lock 
Error Lock 
l=Inhibit 
Traffic, 0=No 
Do not DEQ Work 
Element 


0000 




First Byte of 


1 


PABWEQG 


Gating Bit 






PABWEQA 


.111 nil 


PABRSVOl 


Reserved 


0004 




First Byte of 


1 


PABCHNG 


Gating Bit 






PABCHAIN 


.1 

..1 

... 1 ... . 


PABRESCH 

PABCDP 

PABUNCON 

PABRESET 
PABRUNNG 

pabQued 


Reschedule PAB at 

TPEXIT 

Close DST/Change 

in Progress 

Unconditionally 

Reschedule PAB at 

TPEXIT 

Reset Issued on this 

PAB 

PAB running 

PAB Is qued on APT 








11 


PABRSV02 


Reserved 



PAB (ISTPAB) (Continued) 
Constants in ISTPAB 




Meaning 

Turn PABWEQG Off 
Turn PABWEQG On 
Turn PABCHNG Off 
Turn PABCHNG On 
Turn PABRESCH Off 
Turn PABRESCH On 
Turn PABCDP Off 
Turn PABCDP On 
Turn PABERRLK On 
Turn PABERRLK Off 
Turn PABUNCON Off 
Turn PABUNCON On 
Turn PAB Prior Off 
Turn PAB Prior On 
Turn PABRESETOff 
Turn PABRESETOn 



I 






1 


2 


3 


PIBFLG 
F lag byte 


PIBCNCL 
Cancel code 


PIBLOGID 
SYSLOG indentifier 


PIBDATFL 
Flogs for VM 
support 


P IB SAVE 
Address of SAVE area 


PIBNOC 
Number of 
core blocks 


PIBGRP 
Origin of partition 


PIBASS 
Assign flags 


PIBLUBID 
Uber lub index 


PIBLUBNO 
Nbr of user lubs 


PIBFLG2 
More flags 



PI BUS AVE 
For Attn rtn, PTR to user save area 



Alphabetical List of Fields in ISTPIB 
Field Dec Hex Field 



Dec Hex Field 



PIBASS 0012 OOOC PIBFLG2 

PIBCNCL 0001 0001 PIBLOGID 

PIBDATFL 0004 0004 PIBLUBID 

PIBFLG 0000 0000 PIBLUBNO 



Dec Hex 



0015 OOOF PIBNOC 0008 0008 

0002 0002 PIBORP 0009 0009 

0013 OOOD PIBSAVE 0005 0005 

0014 OOOE PI BUS AVE 0009 0009 



Flag Meanings 










Hex Flag Byte 


Contents 


Bit 


Pattern 


Pattern 


Disp 




Pattern 


Name 


Meaning 


0000 PIBFLG 


Flag Byte 


1111 111. 
1 


@ NM00005 
PIBIOCMP 


Not used 

I/O Completion 


0004 PIBDATFL 


Flags for VM 
Support 


1 


PIBTRAM 


Partition in virtu 
mode 






.111 1111 


@ NM00006 


Reserved 


OOOF PIBFLG2 


More Flags 


1 

.1 

..1 

...1 .... 
.... 1... 

1.. 

1. 

1 


PIBFLG20 

PIBFLG21 

PIBFLG22 

PIBFLG23 

PIBFEOJ 

PIBTASK 

PIBFLG26 

PIBFLG27 


Reserved 
Reserved 
Reserved 
Reserved 
Fetch EOJ 
Cancel Task 
Reserved 
Reserved 


Constants in ISTPIB 










Label Value 


Meaning 









DOSAS VTAM Cancel Code Values 

PIBVFORC X'40' VTAM sympathetic forced cancel 

PIEVSNOC X'4V Cancel due to VTAM should-not -occur condit 

APEOOOOO X'COOO' Cancel code TPEXIT with lock attempted 

VTAM cancel -should not-occur function codes 

I denotes SNO in inbound code 

O denotes SNO in outbound code 

PIE denotes DOS/VS TPIOS module 

The hex value of the code is structured 



PIB (ISTPIB ) (continued) 



Constants 



Label 



(continued) 
Value Meaning 



Where BIT- represents = inbound, 1 = outbound 
BIT - 1 represents =TPIOS, 1 =non-TPlOS 
BITS 2 -3 00=DOSAS 

01 =VS/1 

10=VS/2 

n = Common 



I 



BITS 4-15 =Fuaction code value 



PIEI1242 



RTN code GT from rest 



ISTPICBA 



ISTPICCA 




PIEI2010 


XSITDA' 


RC>OCIDaLfind 


PIEI2015 


X'OTDF' 


RC^OCIDai finish 


PIE 12020 


X'07E4' 


RC>OCIDaLfind 


PIE 12025 


X'07E9' 


RC>OCIDaL finish 


PIEI2030 


X'OTEE' 


RC>OReIstore 


PIEI2035 


X'OTFS' 


ROOCIOaL finish 


PIE 12040 


X'07F8' 


RC>0 relstore 


PIEI2045 


X'OTFD' 


ROOCIDai finish 


PIEI2050 


X'0802' 


RC^OCIOaLfind 


PIE 12060 


X'OBOC 


RC>0 relstore 


PIEI2070 


X'0816' 


RC>0CIDaLfind 


PIEI2080 


X'0820' 


Work element invalid 


PIEI2090 


X'082A' 


RC>8 reqstore 



ISTPICCF 




PIEI0230 


X'00E6' 


RCX) TPLOCK 


PIEI0240 


X'OOFO' 


CIDCTL find error 


PIEI0250 


X'OOFA' 


CIDCTL finish error 


PIEI0260 


X'0104' 


REQSTORE failure 


PIEI0270 


X'OIOE' 


RELSTORE failure 


ISTPICCI 




PIEI3510 


X'0DB6' 


LRA error 


ISTPICCO 




PIEO0020 


X'8014' 


ROB reqstore 


PIEO0030 


X'SOIE' 


ROB recptore 


PIEO0040 


X'8020' 


RC>8 recptore 


PIEO0050 


X'8032' 


R08 reqstore 



PIB(ISTPIB) (confinued) 



Constants 


(continued) 




Label 


Value 


Meaning 


ISTPICCO (continued) 


PIEO0055 


X'8037' 


R08 recptore 


PIEO0060 


X'803C' 


R08 reqstore 


PIEO0065 


X'BOAV 


RC>8 reqstore 


PIEO0070 


X'8046' 


R08 recptore 


PIEO0080 


X'8050' 


CIDCTL find error 


PIEO0090 


X'805A' 


CIDCTL finish error 


PIEOOIOO 


X'8064' 


REQSTORE failure 


ISTPICCS 




PIEO0120 


X'8078' 


RC>8 reqstore 


PIEO0130 


X'8082' 


RC>8 reqstore 


PIEO0140 


X'808C' 


RC>8 reqstore 


PIEO0150 


X'8096' 


RC>8 reqstore 



ISTPICCU 
PIE 10420 X'01A4' 

PIE 10430 X'OIAE' 



RC>8 reqstore 
CSOL FMCB not found 



ISTPICDD 
PIE 1 1910 X'0776' 

PIE 1 1920 X'0780' 

PIEI1930 X'078A' 



RC>8 reqstore 
RC>OCIDaLfind 
ROOCIOai finish 



ISTPICDR 



PIE 10510 


X'OIFE- 


RC> 8 reqstore 


PIE 10520 


X'0208' 


ROOCIDaifind 


PIE 10530 


X'0212' 


RC>Orelstore 


PIE 10540 


X'0210' 


RC>0 relstore 


PIE 10550 


X'0226' 


RC>OCIDaLfind 


ISTPICEI 




PIE 10610 


X'0262' 


R08 reqstore 


PIE 10620 


X'026C' 


RC>8 getstor 


PIE 10630 


X'0276' 


ROO relstore 


PIE 10640 


X'0280' 


RC>0 relstore 


ISTPICES 




PIE 13450 


X'0D7A' 


Invalid input NCB 


PIE 13460 


X'0D84' 


RC>8 reqstore 


PIE 13470 


X'0D8E' 


RC>0 relstore 


ISTPICFl 




PIE 10720 


X'02D0' 


ROO CIDCTL find 


PIE 10730 


X'02DA' 


ROO CIDQL find 


PIE 10740 


X'02E4' 


ROO relstore 


PIE 10750 


X'02EE' 


ROO CIDaL finish 


PIE 10760 


X'02F8' 


ROO CIDaL finish 


PIE 10770 


X'0302' 


RC>OCIDaL finish 


PIE 10780 


X'030C' 


ROO relstore 



PIB (ISTPIB) (continued) 



Constants 


(conti 


hued) 


Label 


Value 


Meaning 


ISTPICGI 




PIEO0210 


X'80D2> 


RC>0TPDVTS 


PIEO0220 


X'SODC 


ROO TPDVTS 


PIEO0230 


X'80E6' 


RC>0 relstore 


PIEO0240 


X'BOFO' 


RC>8 reqstore 


PIEO0250 


X'BOFA' 


ROO ClOai finish 


P1EO0260 


X'8102' 


RC>OCIDaL finish 


ISTPICGP 




PIEI0810 


X'032A' 


RC>8 from reqstore 


PIE 10815 


X'032F' 


RC>OCIDCTL finish 


PIE 10820 


X'0334' 


RC>0 TPDVTS 


PIE 10825 


X'0339' 


RC>0 CIDCTL finish 


PIE 10830 


X'033E' 


Dsconnect cmmd. in error 


PIE 10835 


X'0343' 


RC>0 CIDQl finish 


PIE 10837 


X'0345' 


RC>OCIDaLfind 


PIEI0838 


X'0346' 


RC>OCIDaL finish 


PIE 10840 


X'0348' 


R08 from reqstore 


PIE 10845 


X'034D' 


RC>OCIDaL finish 


PIEI0850 


X'0325' 


RC>OCIDaLfind 


PIE 10855 


X'0357' 


RC>OCIDaL finish 


PIE 10860 


X'035C' 


RC>OCIDaLfind 


PIEI0865 


X'036r 


RC>0 CIDCTL finish 


PIE 10870 


X'0366' 


RC>0 CIDCTL find 


PIEI0875 


X'036B' 


ROO CIDCTL finish 


PIEI0880 


X'0370' 


RC>0 CIDCTL find 


PIEI0885 


X'0375' 


ROO CIDCTL finish 


PIE 10890 


X'037A' 


RC>0 CIDCTL find 


PIE 10895 


X'0384' 


RC>0 from relstore 


ISTPICGR 




PIE 10930 


X'03A2' 


RC>0 TPDVTS 


PIE 10960 


X'03C0' 


ROO relstore 


ISTPICIN 




PIEO0330 


X'814A' 


R08 reqstore 


PIEO6340 


X'8154' 


R08 reqstore 


PIEO0350 


X'815E' 


Invalid LCCW 


PIEO0360 


X'8168' 


RC> 8 relstore 



ISTPICIT 
PIEO0430 X'SIAE' 

PIEO0440 X'81B8' 

PIEO0450 X'81C2' 



R08 reqstore 
RC>0 from TPDVTS 
RC>8 from reqstore 



ISTPICLA 
PIEI1720 X'06B8' 

PIEn730 X'06C2' 

PIE 1 1740 X'06CC' 

PIEI1750 X'06D6' 



ROO relstore 
RC>0 relstore 
RC>8 reqstore 
Unexpected LCPB 



PIB (ISTPIB ) (continued) 



(continued) 
Value Meaning 



ISTPICLC 
PIEO1220 X'84C4' 

PIEO1230 X'84CE' 

ISTPICLT 
PIEO0610 X'8262' 

PIEO0620 X'826C' 



Loop in test channel program 
RC>8 recptore 



RC>8 recptore 
RC>0 TPDVTS 



None 




ISTPICNR 


PIEI1120 


X'0460' 


PIEI1125 


X'0465' 


PIEI1130 


X'046A' 


PIEm35 


X'046F' 


PIEIIMO 


X'0474' 


PIEI1150 


X'047E' 


PIEIlldO 


X'0488' 


PIEI1170 


X'0492' 


PIEinSO 


X'049C' 


PIEO0332 


X'814C' 


PIEO0334 


X'814E' 


ISTPICQP 


PIEI1220 


X'04C4' 


PIEI1230 


X'04CE' 


PIEI1240 


X'04D8' 


PIEn250 


X'04E2' 


PIEI1260 


X'04EA' 


PIEM270 


X'04F4' 


PIEI1280 


X'04FE' 


PIE 11290 


X'0508' 


PIE 11295 


X'OSOD' 



RC>8 from reqstore 
RC>OCIDCTLfind 
RC=Oor 12CIDaLfind 
RC>0 CIDCTL finish 
RC>0 from relstore 
RC>0 from relstore 
RC> 8 from reqstore 
RC>0 from relstore 
RC>0 from CIDCTL finish 
RC>0 CIDCTL find 
RC>0 CIDCTL finish 



RC>8 from reqstore 

ROO from relstore 

RC>0 from relstore 

RC>0 from relstore 

RC>0 from relstore 

RC>0 from CIDCTL for obtaining a lock 

RC>0 from CIDCTL for releasing a lock 

RC>0 from CIDCTL for releasing a lock 

RC>0 from CIDCTL for releasing a lock 



ISTPICRP 




PIE 11320 


X'0528' 


ROB reqstore 


ISTPICSC 




PIEO0510 


X'81FE' 


RC >8 from reqstore 


PIEO0520 


X'8208' 


RC>8 from relstore 


PIEO0530 


X'8212' 


RC>8 from reqstore 


PIEO0540 


X'821C 


RC>0 from relstore 


PIEO0550 


X'8226' 


RC^8 from reqstore 


PIEO0560 


X'8230' 


RC>0 from relstore 


PIEO0570 


X'823A' 


RC>0from relstore 


PIEO0580 


X'8244' 


RC^O from relstore 


PIEO0590 


X'824E' 


RC>8 from reqstore 



PIB (ISTPIB) (continued) 



Constants 


(CO, 


Label 


Value 


ISTPICSO 


PIEO1310 


X'851E' 


PIEO1320 


X'8528' 


PIEO1330 


X'8532' 


ISTPICSS 


PIEO0710 


X'82C6' 


PIEO0720 


X'82D0' 


PIEO0730 


X'82DA' 


PIEO0740 


X'82E4' 


PIEO0750 


X'82EE' 


PIEO0760 


X'82F8' 



Meaning 



RC>8 from reqstore 
RC>OCIDaLfmd 
RC>OCIDCTL finish 



RC->8 from reqstore 

RC>8 from reqstore 

RC>8 from reqstore 

RC>8 from reqstore 

RC>0 from CIDCTL for obtaining a lock 

RC>0 from CIDCTL for releasing a lock 



ISTPICST 
PIEI3610 X'OEIA' 

PIEI3635 X'0E33' 



LRA error 

Unidentifiable completion status 



ISTPICSU 




PIEI1410 


X'0582' 


RC>0 from relstore 


PIEI1420 


X'058C' 


ROO from relstore 


PIEI1430 


X'0596' 


R08 from reqstore 


PIE 11440 


X'OSAO' 


RC>8 from reqstore 


PIEI1450 


X'OSAA' 


RC>OfromTPDVTS 


PIEI1460 


X'05B4' 


RC>0 from CIOaL find 


PIE 11470 


X'OSBE' 


RC>0 from CIDaL finish 


PIEI1480 


X'05C8' 


RC>0 from relstore 


ISTPiaA 




PIE 11620 


X'0654' 


ROO relstore 


PIEI1630 


X'065A' 


RC>8 reqstore 


ISTPICTC 




PIEO1030 


X'8406' 


RC>0 from CIDaL find 


PIEO1040 


X'8410' 


R08 from reqstore 


PIEO1050 


X'841A' 


RC>0 from CIDaL finish 


PIEO1060 


X'8424' 


ROO from CIDaL finish 


PIEO1070 


X'842E' 


RC>8 reqstore 


ISTPOF 




None 






ISTPOH 




PIEI1810 


X'0712' 


RC>8 from reqstore 


PIEI1820 


X'071C' 


RC>0 from relstore 


PIEn830 


X'0726' 


RC>0 from relstore 


PIEI1840 


X'0730' 


R08 from reqstore 


PIEI1850 


X'073A' 


RC>8 from reqstore 


PIEI1860 


X'0744' 


ROO from TPDVTS 



PIB (ISTPI B) (continued) 



Const-ants (contii 


lued) 


Label Value 


Meaning 


ISTPIOTO 
PIEO0820 X'8334' 
PIEO0830 X'833E' 


RC>8 recptore 
RC>0 re (store 


ISTPiaR 
PIEO0930 X'83A2' 
PIEO0940 X'83AC' 
PIEO0950 X'83B6' 


Invalid LCCW 
RC>8 reqstore 
ROO relstore 


ISTPICXP 
PIE 13660 X'0E4C' 
PIE 13670 X'0E56' 


LRA error 
Invalid CB input 


$$ABERV1 




None 




$$ABERV2 
PIEI3760 X'OEBO' 


Valid CB not found 


$$ABERV3 
PIEI3810 X'0EE2' 
PIE 13820 X'OEEC 


LRA error 

CCB not found in ICNCB 



$$ABERV4 
PIEI3880 X'0F28' 

PIE 13860 X'OFM' 

PIEI3870 X'OFIE' 

$$ABERV5 
PIE 13910 X'0F46' 

PIEI3920 X'OFSO' 

$$ABERV6 
PIEI3960 X'0F78' 

$$RAST14 

None 

$$RAST15 

None 

SMS 

None 



Failing CCW not found 
CCB not found in LONCB. 
CC and O APPR LRA 



LRA error 

CCB not found in ICNCB 



PIB (ISTPIB) (continued) 



(continued) 



Label 

,/ PIE 10 192 
PIEi0534 
P1E10625 
PIE 10627 
P1EO0202 
PIEO0204 
PIE 10904 
PIEIIOIO 
PIEI1144 
PIEI1145 
PIEI1146 
PIEI1147 
PiEO0555 
P1EO0557 
P1EI3615 
PIE 13620 
P1EI3625 
PIE 13630 



Meaning 

RC>OTPDVTS 

RC>OTPDVTS 

ROOClOai finish 

RC-=0112 CIDCTLfind 

RC>0TPDVTS within iinkx 

ROOTPDVTS 

RC>OTPDVTS within linkz 

ISTPICMA-relstore failed for MTA association FSB 

ROOfrom ClOai find 

RC>0 from CIDai finish 

RC>Ofrom ClOai find 

ROO from ClOai finish 

ROO from CIDCTLfind 

RC>0 from CIDCTL finish 

CCW at head of buffer not read/writeA^RBP 

NOP preceded by write, not write BP 

Insufficient read CCWS or data-chained read 

Unchained write CCW 



ISTPICXO 
PIEO0224 X'SOEO' 



ISTPIEIR 
P1EO4000 X'8FA0' 



RC>0 CIDCTL find 
TPDVTS failure 



ISTPLIEPB 
PIEO4005 X'8FA5' 

PIEO4006 X'8FA6' 

PE1O4007 X'8FA7' 



Recptore RC>8 
CIDCTL find error 
CIDCTL finish error 



ISTPIEPA 
PIEI4010 X'OFAA' 



ISTPIEIS 
PIEO4015 X'8FAF' 



ISTPIESA 
PIE14017 X'OFBl 



TPDVTS failure 
Reqstore RC>8 
Reqstore return CDE>8 



ISTPIETT 
P1EO4020 X'8FB4' 

PIEO4025 X'8FB9' 

ISTPIECP 
PIE14020 X'OFBO' 

P1EI4025 X'OFBS' 



CIDCTLfind RC-^=0 

CIDCTL re lese DAF look RC- = 



CIDCTL find error 
CIDCTL finish error 



ISTPIELO 
PIEO4030 X'SFBE' 



Reqstore R08 



PIB (ISTPIB) (continued) 



Constanfs (confinued) 

Labe l Value Meaning 



ISTPIELF 
PIE 14035 X'0FC3' 

ISTPIELS 
PIEO4040 X'8FC8' 

ISTPIERO 
PIEO4045 X'SFCD' 

ISTPIERF 
PIEI4050 X'8FD2' 

ISTPIESI 
PIEO4055 X'8FD7' 

ISTPIESG 
PIEO4060 X'SFDC 

PIEO4061 X'8FDD' 



Recptore R08 

Recptore>8 

Recistore>8 

Reqstore>8 

Recpfore>8 



Recptore RC>8 
Reqstore ROO 



11-140 



RDT (ISTRDT) 



Dec Hex 




48 
4C 



100 


64 


104 


68 


108 


6C 


112 


70 



RDT PRE 
Entry prefix 



RDTPLEN 
Priority and length field 



RDTFORW 
Foreword pointer 



RDTBACK 
Backward pointer 



RDTFIAGS 
Segment flogs, unused/reused 



RDTMAXID 
Max node ID 
for network 



RDTNODID 
Node ID for 
this segment 



RDiaSNT 
Count of SNT entries for segment 



RDTLCa 
Count of logons 
outstanding 



RDTFLAGB 
F lag byte 



RDTVPAB 
Address of vary PAB 



RDTEPAB 
Address of ERP PAB 



RDTDPAB 
Address of dump/load/restart PAB 



RDTTPAB 
Toltep SSCP PAB 



RDTVYRPH 
(3i of Vary RPH Waiting for Restart Completion 



RDTSINCNT 
Active Subnode 
Count 



(aJNMOOOQS 
Reserved 



RDTCRSDS 
C/R Data Set Identifier Blank implies not specified 



RDTCRSPW 
C/R Data Set Password Blank implies not specified 



RDT (ISTRDT) (Continued) 















Dec 


Hex 
84 





1 


2 


3 


132 


RDTVSRPL 
C/R Pointer to VSAM RPL 




O 


IG RDTPLEN 




72 


48 


RDTPRIOR 
Determines 
segment type 






ORG 


RDTPLEN+1 




73 


49 


RDTLEN 
Length of RDT 




OF 


G RDTVYRPH 




108 


6C 


RRNVYRPH 
Q of Vary RPH waiting for Restart completion 




ORG 


RDTSTCNT 




112 


70 


RRNSTCNT 
Active subnode 
count 





Alphabetical List of Fields in ISTRDT 



Field Dec 


Hex 


Field 


Dec 


Hex 


Field 


Dec 


Hex 


(q)NM00006 0113 


0071 


RDTFLAGS 


0084 


0054 


RDTPRIOR 


0072 


0048 


RDTBACK 0080 


0050 


RD7FORW 


0076 


004C 


RDTSTCNT 


0112 


0070 


RDTCRSDS 0116 


0074 


RDTLEN 


0073 


0049 


RDTTPAB 


0104 


0068 


RDTCRSPW 0124 


007C 


RDTLGCT 


0090 


005A 


RDTVPAB 


0092 


005C 


RDTCTSNT 0086 


0056 


RDTMAXID 


0088 


0058 


RDTVSRPL 


0132 


0084 


RDTDPAB 0100 


0064 


RDTNODID 


0089 


0059 


RDTVYRPH 


• 0108 


006C 


RDTEPAB 0096 


0060 


RDTPLEN 


0072 


0048 


RRNSTCNT 


0112 


0070 


RDTFIAGB 0091 


005B 


RDTPRE 


0000 


0000 


RRNVYRPH 


0108 


006C 


Flag Meanings 
















Hex 






Bit 




Pattern 


Pattern 




Disp Flag Byte Contents 




Pattern 




Name 


Meanin 


g_ 


0048 RDTPRIOR Determines 


Segment 


111. . 




@NM00005 


Not Used 


Type 






...1 . 


.. 


RDTPRIAP 
RDTPRILC 
RDTPRIRN 
RDTPRISW 


Application Segment 
Local Segment 
RN Segment 
Switched Segment 










.1 


RDTPRILS 


Local S 


ubarea Segment 


005B RDTFLAGB Flag Byte 




1... . 




RDTOUERP 


1 = Repeat ERP 












RDTPRGDN 


1 = Purge Issued 








..i. . 




RDTCTPGD 


1 = Contact Purged 








...1 . 




RDTCTCFL 


Higher 


Failure- 














Contact Flushed 








.... 1 




RDTBHSET 


BHSET Required 








m 


RDTRSVOl 


Reserved 



RH (ISTRH) 










Dec Hex 





1 


2 


3 





RHFLAGS 
Request header flags 




Org 


WFIAGS 











RHl 

1st RH byte 




Org 


mFLAGS + 1 




1 1 


RH2 

2nd RH byte 




OrgRHFlAGS+2 






2 2 


RH3 

3rd RH byte 





Disp. Flag 



First RH byte 


RHQS 


X'80" 


- request, 1 - response 




RHTYPE 


X'40' 


- data, 1 - control 




RHSCI 


X'20' 


- FM, 1 - system control 




RHDIRI 


X'10' 


- with, 1 - against 




RHFORMAT 


X'08" 


- unformatted, 

1 - formatted 




RHSENSE 


X'04' 


- not included, 

1 - included 




RHCHAIN 


X'03' 


Chaining control 
- middle, 1 - last, 
2 -first, 3 -only 


Second RH byte 


RHFME 


X'80' 


Q-FME requested, 
S -FME 




RHPE 


X'40' 


Q - PE requested, S - PE 




RHRRN 


X'20' 


Q - RRN requested, 
S -RRN 




RHEXCEPT 


X'10' 


Q - exception responses 
only, S - error 




RHRETRY 


X'08' 


Q - retry 




RHBUSY 


X'08' 


S - busy 




RHRSVDl 


X'04' 


Q - reserved 




RHNIOP 


X'04' 


S - inoperative 




RHRSVD2 


X'02' 


Q - reserved, S - reserve 




RHPACE 


X'Ol' 


Q - pacing 


Third RH byte 


RHBB 


X'80' 


Begin sequence 




RHFB 


X'40' 


End sequence 




RHCDIR 


X'20' 


Change direction 




RHRCDIR 


X'10' 


Request change direction 




RHRSVD3 


X'08' 


Reserved 




RHLOG 


X*04' 


Log 




RHRSVD4 


X'02' 


Reserved 




RHRSVD5 


x'or 


Reserved 



RH (ISTRH) (continued) 



Constanb In ISTRH 



Meaning 



RHFIRST 


BMO' 


First in chain 


RHMIDLE 


B'OO' 


Middle of chain 


RHL^ST 


B'or 


Last in chain 


RHONLY 


BMl' 


Only one in chain 


RHRESP 


X '938000 ■ 


RH response mask 


RHREQ 


X '030000' 


RH request mask 



RPH (ISTRPH) 



Dec Hex 




4 4 

8 8 

12 C 

16 10 



) 104 



RPHCNTL 
Csntrol Information 



RPHRPHA 
Address of next RPL Header 



RPHTSKID 
Task Identification or Address of APS Table 



RPHDVTA 
Address of Current DVT 



RPHRESMA 
TPWAIT-Post Information 



RPHPABOF 
Offset of PAB 
in Control BLK 



RPHMAJCB 
Address of Major Control Block 



RPHWEA 
Address of Work Element 



RPHSRPRM 
Ser/ice Routine Parm. Field 



RPHCRR 
Address of Component Recovery Area 



RPHPABWD 
PAB Word Address 



RPHWORK 
16 Word Work Area 



RPHNEXPO 
Address Next RPH to be Posted 



1 



RPH (ISTRPH) (Continued) 














Dec Hex 


1 ° 


1 


2 


3 




Org RPHCNTL 











RPH TYPE 
Confrol Block 
Type 


RPHLNGTH 
Length in 
Bytes 


RPHFIAGS 
System Dependent 
Flags 






Org RPHCNTL+3 








3 3 


RPHFLGB 
Second flag 
byte 



Org RPHRPHA 




First Byte of 
RPHRPHA 




Org RPHRPHA + 1 






RPHRPHAP 


OrgRPHTSKID 




(aNM00002 
RPH TSK ID 


RPHTIK 
TIK 


Org RPHRESMA 




RPHWPFLG 
Wait-Post Flags 




Org RPHRESMA + 


1 




RPHRESUM 
Resume Address 


Org RPHWEA 




RPHCSPA 
Address of ISTCSP 


Org RPHCSPA 




First Byte of 
RPHWEA 




Org RPHSPRM 




RPHSRP12 
Count of Q'ed SMS Requests 


RPHSRP34 
Size of Q'ed SMS Requests 


Org RPHPABWD 




RPHPABFG 
Flag Byte 




Org RPHPABWD + 


1 




RPHPABQP 
Pointer to Queue of PAB's 


Org RPHPABQP 






RPHPABQA 
PAB Pointer 



RPH (ISTRPH) (Continued) 



















Dec 


Hex 





1 


2 


3 




Org RPHWORK 








40 


28 


RPHSAVE1 




Ore 


3 RPHSAVEl 










40 


28 


RPHSBYTE 
1-Byte Save 
Field 


RPHSBITS 
Save Field for 
Flag Byte 








Ore 


3 RPHSAVE 1 + 2 










42 


2A 




RPHSHALF 
Half Word Save Area 




Ore 


3 RPHWORK +4 








44 


2C 

30 
34 
38 
3C 
40 
44. 
48 
4C 
50 
54 
58 
5C 


RPHSAVE2 


48 


RPHSAVE3 


52 


RPHSAVE4 


56 


RPHSAVE5 


60 


RPHSAVE6 


64 


RPHSAVE7 


68 


RPHSAVE8 


72 


RPHSAVE9 


76 


RPHSAVEIO 


80 


RPHSAVEl! 


84 


RPHSAVE 12 


88 


RPHSAVEl 3 


92 


RPHSAVE 14 



RPH (ISTRPH) (Continued) 



Dec 


Hex 
60 

64 





1 


2 


3 


96 


RPHSAVE15 


100 


RPHSAVE16 



Alphabetical List of Fields in ISTRPH 
Field Dec Hex Field 



Dec Hex Field 



Dec Hex 



(a) NM00002 
RPHCNTL 
RPHCRR 
RPHCSPA 
RPHDVTA 
RPHFLA.GS 
RPHFLGB 
RPHLNGTH 
RPHAAAJCB 
RPHNEXPO 
RPHPABFG 
RPHPABOF 
RPHPABQA 
RPHPABQP 
RPHPABWD 
RPHRESAAA 



0008 
0000 
0032 
0024 
0012 
0002 
0003 
0001 
0021 
0104 
0036 
0020 
0037 
0037 
0036 
0016 



0008 
0000 
0020 
0018 
OOOC 
0002 
0003 
0001 
0015 
0068 
0024 
0014 
0025 
0025 
0024 
0010 



RPHRESUM 

RPHRPHA 

RPHRPHAP 

RPHSAVEl 

RPHSAVE2 

RPHSAVE3 

RPHSAVE4 

RPHSAVE5 

RPHSAVE6 

RPHSAVE7 

RPHSAVE8 

RPHSAVE9 

RPHSAVIO 

RPHSAVll 

RPHSAV12 

RPHSAV13 



0017 
0004 
0005 
0040 
0044 
0048 
0052 
0056 
0060 
0064 
0068 
0072 
0076 
0080 
0084 



0011 
0004 
0005 
0028 
002C 
0030 
0034 
0038 
003C 
0040 
0044 
0048 
004C 
0050 
0054 
0058 



RPHSAV14 

RPHSAV15 

RPHSAV16 

RPHSBITS 

RPHSBYTE 

RPHSHAlf 

RPHSRFRM 

RPHSRP12 

RPHSRP34 

RPHTIK 

RPHTSKID 

RPHTYPE 

RPHWEA 

RPHWORK 

RPHWPFLG 



0092 005C 

0096 0060 

0100 0064 

0041 0029 
0040 0028 

0042 002A 
0028 00 IC 
0028 00)C 
0030 00 IE 
0011 OOOB 
0008 0008 
0000 0000 
0024 0018 
0040 0028 
0016 0010 



Flag Meanings 



Hex 

Disp Flag Byte 



0002 RPHFLAGS 



System Dependent 
Flags 



0003 RPHFLGB Second Flag Byte 



Bit Pattern 

Pattern Name 

1 RPHOGIND 

.1 RPHSPGIN 

. . 1 RPHAPTYP 

... 1 .... RPHSMQ 

.... 1 . . . RPHSMTYP 

1 . . RPHSMCLR 

1 . RPHMLTCP 

1 RPHFSTLC 

1 RPHFNFLG 

1 RPHLOCK 

.1 RPHBSSP 



Pattern 
Meaning 

Open Gate Indicator 
Special Gate Open 
Indicator 

APS is a User Exit 
Indicator if RPH is 
to be Queued 
Request Type is Buffer 
or Double-Word 
Indicator if Buffer 
to be Cleared 
Used by Local 3270 
Support when building 
Multiple Chan Program 
Used by Local 3270 
Support to Indicate 
First LCCW 
LCCW Set Function 
Flags 

Locking Option 
System Services 
Progress 



RPH (ISTRPH) (Continued) 



Flag Meanings (Continued) 








Hex 




Bit 


Pattern 


Pattern ^H 


Disp 


Flag Byte Contents 


Pattern Name 


Meaning ^^| 






..1. 


.... RPHBAPS 


STG. Obtained by APS 






...1 nil RPHNRSAV 


Do not Save on 










Activate 


0004 


First Byte of 


1... 


.... RPHGATE 


Gating Flag 




RPHRPHA 


.111 


1111@NM0001 


Reserved 


0010 


RPHWPFLG Wait-Post Flags 


nil 


.... RPHRSKEY 

1 . . . RPHWT 
.1.. RPHPT 
..11 (aiNM00003 


Storage Protect Key 

to Resume Processing 

Wait Bit 

Post Bit 

Reserved for Wait/Post 


0018 


First Byte of 
RPHCSPA 


1... 


.... RPHWEGT 


Gate for Work 
Element Proc. 


0024 


RPHPABFG Flag Byte 


1... 


.... RPHDEACT 


RPH has been 

De-activated VS/1 

only 

Locks held by Abended 






.1.. 


.... RPHLKFRE 










Process have been 










Freed (VS/1 only) 






.1.. 


.... RPHPGCMP 


Purge Complete 
(VS/2only) 






..1. 


.... RPHRLCRA 


Indicates that ISTAPC64 
should free the CRA 






...1 


.... RPHAUTEX 


Exit to Authorized 
User VS/2 only 








1... RPHPURGE 


RPH Flagged by 
Recovery to be purged 
by PSS VS/2 only 








.111(q)NM00004 


Reserved 


0029 


RPHSBITS Save Field for 


1... 


.... RPHSBITl 


1st Save Field 




Flag Byte 


.1.. 
..1. 
...1 


.... RPHSBIT2 
.... RPHSBIT3 
.... RPHSBIT4 
1... RPHSBITS 
.1.. RPHSBIT6 
..1. RPHSBIT7 
...1 RPHSBITS 


2nd Save Field 
3rd Save Field 
4th Save Field 
5th Save Field 
6th Save Field 
7th Save Field 
8th Save Field 



Constants in iSTRPH 



Label 



Value 



Meaning 



RPTYPE X'Or Type Code for RPH 

X RPHWTO X'FTFFFFFF' Turn RPHWT Off 

) RPHWTl X'08000000' Turn RPHWT On 

' RPHPTO X'FBFFFFFF' Turn RPHPT Off 

RPHPTl X'04000000' Turn RPHPT On 

RPHPABQl X'OOOOOO' Turn RPHPBQ Gate 



RPL (ISTRPL) 



Dec Hex 




28 IC 



@NM00005 
RPLID 



@NM00013 
Reserved 



(aNM000]7 
RPLOPTI 



:aiNM00026 
Reserved 



@NM00006 
RPL Subtype 
Field 



(a)NM00007 
Reserved 



RPLLEN2 
RPL Length 



RPLPLHPT 
RPLH Pointer 



@NM00008 
CID or NIB Pointer RPLARG 



@NM00009 
Pointer to Area RPLAREA 



(oiNMOOOlO 
Record Length RPLRLEN 



(cDNMOOOn 
Area Length RPLBUFL 



(aNM000.12 
Pointer to ACB RPLDACB 



@NM00014 
Request Code 
RPLREQ 



(a)NM00Q21 
Reserved 



@NM000.15 
Reserved 



RPLEXTDS 
Exit Definition 



(aNM00016 
Reserved 



@NM00025 
Reserved 



(aiNM00027 
Feedback RC RPLFDBK 



RPLAAREA 
Alternate Area Pointer 



RPLECB 
ECB or Pointer to ECB/EXIT 



RPLAARLN 
Alternate Area Length 



RPL (ISTRPL) ( Continued) 





Hex 
34 

38 

3C 

40 

44 

48 

4C 

50 
54 

58 
5C 

60 










Dec 





1 


2 


3 


52 


RPLARCLN 
Alternate Record Size 


56 


RPUDBK2 
Feedback Word 


60 


RPLUSFLD 
User Field 


64 


RPLOPTC2 
Additional Option Codes 


68 


RPLOPTC3 
Move VTAM Options 


72 


RPLRH3 
Third RH 
Byte 


RPLSRTYP 
Send or 
Receive Type 


RPLVTFLl 

VTAM 

Flags 


RPLVTFL2 

VTAM 

Flags 


76 


RPLCHN 
Position in 
HU Chain 


RPLCNTRL 

PU Control Code 


80 


RPLOBSC 
STSN Outbnd. S 


3V 

eq. Nr. 


RPLIBSQV 
STSN Inbind. Seq. Nr. 


84 


RPLOBSQ 
STSN Outb. 
Action Code 


RPLIBSQ 
STSN Inbound 
Action Code 


RPLSEQNO 
Sequence Number 


88 


RPLOSENS 
Sense Output Data 


92 


RPLACTIV 
Subtype-X'FF' 
= Active, 
X'OO' = Inact. 


RPLRSVl 


96 


RPLSIGDA 
Signal Data 



RPL (ISTRPL) ( Continued) 



12 3 



Org@NM00008 



RPLSAF 


RPLDAF 



Org RPLEXTDS 



Org @NM00027 



3)NM00028 
RPLRTNCD 


@NM00029 
RPLFDB2 



Org @NM00027+2 



(^ NM0003(J 
RPlfDB3 



Org RPLECB 



(3) NM00031 
Reserved 



Org RPLEC&f3 



Third byte of 
RPLECB 



(5) NM00033 
Reserved 



Org 



RPLFDBK2 



RPLSSNSI 
System Sense Inp. 



Org RPLSSNSI 



RPLDSB 
Device Status 



Org RPLDSB 



RPLDSB 1 
Dev . Status 
Byte 1 



Org RPLDSB! 



RPLSSEI 
SysSNS 
Error Codes 



RPL (iSTRPL) ( ConKnued) 



X 





1 


2 


3 


Org 


RPLDSB+1 








RPLDSB2 
Dev. Status 
Byte 2 




Org RPLDSB2 








RPLSSMI 
SYS SNS 
Mod Inp 




Org RPlfDBK2+2 








RPLUSNSI 
User Sense Input 


Org RPLUSNSI 






RPLESRl 
Extd , Syst . 
Resp. 1 


RPLESR2 
Extd. Syst. 
Resp. 2 



I 



Org RPLOPTC2 



RPLOPT5 
Fifth Byte 
of Options 



Org RPLOPTC2+1 



RPLOPT6 
Sixth Byte 
of Options 



Org RPLOPTC2+2 



RPLOPT7 
Seventh Byte 
of Options 



Org RPLOPTC2+3 



IRPLOPT8 
Eighth Byte 
of Options 



Org RPLOPTC3 



RPLOPT9 
Ninth Byte 
of Options 



Org RPLOPTC3+-1 



RPLOPTIO 
Tenth Byte 
of Options - 



11-153 



RPL (ISTRPL) ( Continued) 



12 3 



Org RPLOPTC3f2 



RPLOPTll 
Eleventh Byte 
of Optrons 



Org RPLOPTC3f3 



RPLOPT12 
Twelvth Byte 
of Options 



Org RPLCNTRL 



RPLCNTDF 
Dote Flow 
Control Codes 



Org RPLCNTRL-ri 



RPLCNTDC 
Data Flow 
Control CTD 



Org RPLCNTRL+2 



RPLCNTSC 
Session Control 
Codes 



Org RPLOSENS 



RPLSSNSO 
System Sense Output 



Org RPLSSNSO 



RPLSSEO 
System Sense 
Error Code 



89 59 



Org RPLSSNSO+I 



RPLSSMO 
System Sense 
Mod Output 



Org RPLOSENS+2 



RPLUSNSO 
User Sense Output 



RPL (ISTCPL) (Continued) 



Alphabetical List of Fields 


in ISTRPL 












Field 


Dec 


Hex 


Field 


Dec 


Hex 


Field 


Dec 


He, 1 


@NM00005 


0000 


0000 


RPLCHN 


0076 


004C 


RPLOPT6 


0065 


0041 1 


§NM00006 


0001 


0001 


RPLCNTDC 


0078 


004E 


RPLOPT7 


0066 


0042 ■ 


@NM00007 


0002 


0002 


RPLCNTDF 


0077 


004D 


RPLOPT8 


0067 


0043 


@NM00008 


0008 


0008 


RPLCNTRL 


0077 


004D 


RPLOPT9 


0068 


0044 


^NM00009 


0012 


txwc 


RPLCNTSC 


0079 


004F 


RPLOSENS 


0088 


0058 


@NA/«)0010 


0016 


0010 


RPLDAF 


0010 


OOOA 


RPLPLHPT 


0004 


0004 


@NAA0O011 


0020 


0014 


RPLDSB 


0056 


0038 


RPLRH3 


0072 


0048 


@NM00012 


0024 


0018 


RPLDSBl 


0056 


0038 


RPLRSVl 


0093 


005D 


^NM00013 


0028 


00 IC 


RPLDSB2 


0057 


0039 


RPLSAF 


0008 


0008 


@NM00014 


0029 


00 ID 


RPLECB 


0044 


002C 


RPLSEQNO 


0086 


0056 


@NM00015 


0030 


OOIE 


RPLESRl 


0058 


003A 


RPLSIGDA 


0096 


0060 


g)NM00016 


0031 


OOIF 


RPLESR2 


0059 


003B 


RPLSTYP 


0073 


0049 


(oiNMOOOl? 


0032 


0020 


RPLEXTDS 


0034 


0022 


RPLSSEl 


0056 


0038 


^NM00021 


D033 


0021 


RPLEXTDl 


0034 


0022 


RPLSSEO 


0088 


0058- 


§)NM00025 


0035 


0023 


RPLFDBK2 


0056 


0038 


RPLSSMl 


0057 


0039 


§)NM0£)026 


0036 


0024 


RPLIESQ 


0085 


0055 


RPLSSMO 


0089 


0059 


§)NM00027 


0037 


0025 


RPUESQV 


0082 


0052 


RPLSSNSI 


0056 


0038 


@NM00028 


0037 


0025 


RPLLEN2 


0003 


0003 


RPLSSNSO 


0088 


0058 


^NM00029 


0038 


0026 


RPLOBSQ 


0084 


0054 


RPLUSFLD 


0060 


003C 


@NM00030 


0039 


0027 


RPLOBSQV 


0080 


0050 


RPLUSNSI 


0058 


003A 


@NM00031 


0044 


002C 


RPLOPTC2 


0064 


0040 


RPLUSNSb 


0090 


005A 


@NM00033 


0047 


002F 


RPLOPTC3 


0068 


0044 


RPLVTFLl 


0074 


004A 


RPLAAREA 


0040 


0028 


RPLOPTIO 


0069 


0045 


RPLVTFL2 


0075 


004B 


RPIAARLN 


0048 


0030 


RPLOPTl 1 


0070 


0046 








RPLAVTIV 


0092 


005C 


RPLOPT12 


0071 


0047 








RPIARCLN 


0052 


0034 


RPLOPT5 


0064 


0040 








Flag Meanings 
















Hex 








Bit 


Pattern 


Pattern 


Disp Flag 


Byte 


Contents 

Third Byte of 
RPLECB 


P 


3ttem 


Name N 

RPLPOST E> 
a NM00032 R 


eaning 


002E 


ill iii 


/ent Complete 
jserved 


0020 @NM00017 


RPLOPTl 




111 .... 
... 1.. 


@NM00018 Reserved 
@NM00019 RPiASV 












... .11 


@NM00020 Reserved 














RPLECBIN 


1 


= External ECB 


0022 RPLEXTDl 










RPLEXSCH Exit Scheduled 
















Indicator 















RPLNEXn 


N 


o Exit Specified 












1 


RPLEXIT 


Exit 












.. .1.. 


(aNM00022 Reserved 
@NM00023 Reserved 
RPLNIB l=ARGHasNIB 
















Pointer 














RPLBRANC 1 


= Branch Entry 
















to Macro 














(aNM00024 Reserved 



RPL (ISTRPL) (Continued) 
Flag Meanings (Continued) 



0026 


(aNM00029 


RPLFDB2 


1 RPLERLK 

.1 RPLRVID 

..1 RPLATND 

...1 RPLDVUNS 

.... 1... RPLIOERR 

1.. RPLDLGFL- 

I. RPLCUERR 

1 RPLSTSAV 


Error Lock Set 
RVI Received 
Attention Received 
Device Unuseable 
I/O Error Type 
(0-lnput, 1-Output) 
Dialog Initiation 
Failed 

Control Unit Failure 
Sense Bytes Present 


0027 


(aNM00030 


RPLfDB3 


1 RPLUINPT 

.1 RPLTSV32 

..1 RPLREOB 

...1 .... RPU?EOM 
.... 1... RPLREOT 

1.. RPLLGFRC 

1. RPLRLG 

1 RPLRDSOH 


Unsolicited Input 
Reserved' 
End of Block 
End of Message 
End of Transmission 
Logoff Received 
Leading Graphics 
Received 
SOH Received 


0038 


RPL5SEI 


Sys.Sns Err. Codes 


1 RPLPATHI 

.1 RPLCPMI 

..1 RPLSTATI 

...1 .... RPLFII 
.... 1... RPLRRI 
Ill @NM00034 


SSENSEI Path 
SSENSEI CPM 
SSENSEI State 
SSENSEI Fl 
SSENSEI RR 
Reserved for VTAM 


004A 


RPLVTFL1 


VTAM Flags 


1 @NM00045 

.1 RPLVTUSE 

..11 nil (a)NM00046 


Reserved 
SWITCHC 
0=APP/l=System 
Reserved for VTAM 


004B 


RPLVTFL2 


VTAM Flags 


1111 .... RPLOSTV 

1 RPLSCHED 

.111 .... (oDNM00047 
.... 1111 RPLRESP 
.... 1... @NM00O48 

1.. RPLEX 

1. RPLNFME 

1 RPLRRN 


Post 0=RESP/l=Sched 
Reserved for VTAM 

Reserved for VTAM 
Respond 0=NEV1=EX 
Respond 0=FME/1=NFM 
Respond 0=NRRN/ 
1=RRN 


004C 


RPLCHN 


Position in HU Chain 


1 RPLFIRST 

.1 RPLMIDLE 

..1 RPLLAST 

...1 .... RPLONLY 
.... nil (a)NM0OW9 


Chain First 
Chain Middle 
Chain Last 
Chain Only 
Reserved for VTAM 


004D 


RPLCNTDF 


Data Flow Cntrl 


1 RPLDATA 


Control Data 






Codes 


.1 RPLCNCEL 

..1 RPLQC 

...1 .... RPLQEC 
.... 1... RPLCHASE 
1.. RPLRELQ 


Control Cancel 
Control QC 
Control OEC 
Control Chase 
Control RELQ 



RPL (ISTRPL) (Continued) 
F lag Meanings (Continued) 



Hex 
Disp 



Flag Byte 



004E RPLCNTDC 



004F RPLCNTSC 



0040 RPLOPT5 



Data Flow Control 
CTD 



Session Control 
Codes 



Fifth Byte of Options 1 



0041 RPLOPT6 



0042 RPLOPT7 



Sixth Byte of Options 1 , 



Seventh Byte of 
Options 



Pattern 


Pattern bmh 


Nome 


Meaning ^^M 


RPLQI 


Reserved for VTAM 


(oiNMOOOSO 


Reserved for VTAM 


RPLBID 


Control BID 


RPLRTR 


Control RTR 


RPLLUS 


Control LUS 


RPLSIGNL 


Control Signal 


@NM00051 


Reserved for VTAM 


RPLSDT 


Control SDT 


RPLCLEAR 


Control Clear 


RPLSTSN 


Control STSN 


RPLSHUTO 


Control Shutd 


RPLSHUTC 


Control Shutc 


RPLRQR 


Control RQR 


RPLRSHUT 


Control RSHUTD 


(alNM00052 


Reserved for VTAM 


RPLDLGIN 


Dialog Indicator 




1 =CS, 0=CA 


(aNM00035 


Reserved 


RPLPSOPT 


Pass Option 


RPLNERAS 


Write No Erase 


RPLEAU 


Write Erase 




Unprotected 


RPLERACE 


Write Erase 


RPLNODE 


Node Indicator 




1 = Any, = Spec 


RPLWROPT 


Write Option, 




1 = Conv, = 




Nconv 


RPLEOB 


End of Block 


RPLEOM 


End of Message 


RPLEOT 


End of Transmission 


RPLCOND 


Reset Conditional 


RPLNCOND 


Reset Unconditional 


RPLLOCK 


Reset Lock 


@NM00036 


Reserved 


RPLRSV68 


Reserved 


RPLCNNALL 


Connect All 


RPLCNANY 


Connect Any 


RPLCWYMM 


Connect Immediate 


RPLQOPT 


Open Destination 




Q Opt 


RPLTPOST 


1 - Already under 


RPLRLSOP 


Release Option 


RPLRSV77 


Reserved 


RPLRSV78 


Reserved 



RPL (ISTRPL) (Contin 


ued) 






Flag Meanings (Cont 


nued) 






Hex, 


Bit 


Pattern 


Pattern 


Disp Flag Byte 


Contents Pattern Name 


Meaning 


0043 RPLOPT8 


Eigth Byte of Options 1 . . . 


RPLODACQ 


Acquire 




.1.. 


RPLODACP 


Accept (Default) 




..1. 


@NM00037 


Reserved 






RPLPEND 


Pend (Default) 






1... RPLSESS 


Session 






.1.. RPLACTV 


Active 






..1. RPLUNCON 


Uncondl 






...1 RPLRSV88 


Reserved 


0044 RPLOPT9 


Ninth Byte of Options 1... 


RPLLOGON 


INQ Logon MSG 
(Default) 




.1.. 


.... RPLDEVCH 


INQ Device Char 




..1. 


RPLTERMS 


INQ Terms 






.... RPLCOUNT 


INQ Counts 






1... RPLAPPST 


INQ Appstat 






,1.. RPLRNNM 


INQ Rnname 






..1. RPLCIDE 


INQCidxIate 






...1 RPLTOPL 


INQ Top logon 


0045 RPLOPTIO 


Tenth Byte of Options 1 . . . 


.... RPLBSCID 


INQ BSC ID 






.... RPLDSPLY 


INQ Display 




..1. 


RPLSPARM 


INQ Session 






.... RPLRSV12 


Reserved 






1... RPLRSV13 


Reserved 






.1.. RPLRSV14 


Reserved 






..1. RPLRSV15 


Reserved 






...1 RPLRSV16 


Reserved 


0046 RPLOPTll 


Eleventh Byte of 1... 


RPLQUIES 


Setlogon Quiesce 




Options 




(Default) 




.1.. 


RPLSTART 


Setlogon start 




..1. 


RPLSTOP 


Setlogon Stop 






.... RPLRSVE4 


Reserved 






1 . . . RPLRSVE5 


Reserved 






.1.. RPLRSVE6 


Reserved 






..1. RPLRSVE7 


Reserved 






... 1 RPLRSVE8 


Reserved 


0047 RPLOPT12 


Tweivth Byte of 1... 


.... (SJNMOOOSS 


Reserved 




Options . 1 . . 


RPLKEEP 


Receive Keep 




..1. 


RPLTRUNC 


Receive Trunc 






RPLNIBTK 


Receive Ml BTK 






1... ^NM00039 


Reserved 






. 1 . . @NM00040 


Reserved 






..1. @NM00041 


Reserved 






...1 RPLFMHDR 


0=NFMHDR 
1 = FMHDR 


0048 RPLRH3 


Third RH Byte 1... 


RPLBB 


Bracket = NBB 
1 = BB 




.1.. 


RPLEB 


Bracket 0= NEB 
1 =EB 



RPL (ISTRPL) (Continued) 
)' Flag Meanings (Continued) 



Hex 






Bit 


Pattern 


Pattern _ 


Disp 


Flag Byte 


Contents 


Pattern 
..1 

...1 .... 

.... 1... 


Name 
RPLCMD 

RPLCHREQ 

RPLCSI 


Meaning | 

CHNGDIR 1 

= NCMD, 

1 = CMb 
CHNGDIR 
0=NREQ, 
1 = REQ 
Code Selection 
Indicator = Basic 
Code/1 = Alternate 
Code 








Ill 


(aiNM00W2 


Reserved for VTAM 


0049 


RPLSRTYP 


Send or Receive Type 


nil .... 

1 


RPLSTYPE 
■ RPLSRESP 


Send Type 
Stype = REQ/ 
1 = RESP 








.111 .... 


(cbNMOOWa 


Reserved for VTAM 








.... nil 

1,. 

1. 

1 


RPLRTYPE 
RPLRRESP 

RPLNFSYN 
RPLDFASY 
(aNM00M4 


Receive Type 
Rtype = NRESP/ 
1 = RESP 
Rtype 

= DFSYN/ 

1 = NDFSYN 
Rtype 

0=NDFASY/ 
1 = DFASY 
Reserved 


0054 


RPLOBSQ 


STSN Outb. Action 


1 


RPLOSET 


OBSQACSet 






Code 


.1 

..1 

...1 .... 


RPLOTST 

RPLORSET 

RPLOIGN 

RPLOPOS 

RPLONEG 

RPLOINV 

(aNM00Q53 


OBSQAC Testset 
OBSQAC Reset 
OBSQAC Ignore 
OBSQAC Testpos 
OBSQAC Testneg 
OBSQAC Invalid 
Reserved for VTAM 


0055 


RPLIBSQ 


STSN Inbound 




RPLISET 


IBSQAC Set 






Act. Code 


.1 

..1 

...1 .... 


RPLITST 

RPLIRSET 

RPLIIGN 

RPLIPOS 

RPLINEG 

RPLIINV 

(alNM00054 


IBSQAC Testset 
IBSQAC Reset 
IBSQAC Ignore 
IBSQAC Testpos 
IBSQAC Testneg 
IBSQAC Invalid 
Reserved for VTAM 


0058 


RPLSSEO 


System Sense 




, (aiNM00055 


Reserved for VTAM 






Err.CD/S 


.1 

..1 

...1 .... 
.... 1... 


RPLCPMO 
RPLSTATO 
RPLFIO 
RPLRRO 


SSENSEO CPM 
SSENSEO State 
SSENSEO Fl 
SSENSEO RR 








Ill 


(aNM00056 


Reserved for VTAM 



RPL (ISTRPL) (Contfnued) 
Consfanh in ISTRPL 



Label Value Meaning 

The following Equates ore for the Various Request Codes that may be set 



RPLWRITE 
RPLRESET 
RPLDO 



X'lr 
X'12' 
X'13' 



Write 
Reset 
Do 



RPLQUISE 

RPLSMLGO 

RPLOPNDS 

RPLCHNG 

RPLINQIR 

RPLINTPT 

RPLREAD 

RPLSLICT 

RPLCLOSE 

RPLCLACB 

RPLSNDCD 

RPLRCVCD 

RPLRSRCD 

RPLSSCCD 



X'15' 
X'16' 
X'17' 
X'19' 
X'lA' 
X'lB' 
X'lD' 
X'lE' 
X'lF' 
X'21' 
X'22' 
X'23' 
X'24' 
X'25' 



The following ore possibli 

X'OO' 
X'04' 
X'08' 
X'OC 
X'lO' 
X'14' 
X'18' 
X'lC 
X'20' 
X'24' 
X'28' 
X'2C' 
X'30' 
X'34' 
X'38' 



RPLAOK 

RPLCBLKE 

RPLLOGIC 

RPLPHYSC 

RPLNGRCC 

RPLSPECC 

RPLCMDRT 

RPLPURGE 

RPLVTMNA 

RPLSYERR 

RPLDEVDC 

RPLLIMEX 

RPLEXRQ 

RPLEXRS 

RPLNOIN 



Quiesce 

Simulated Logon 

Open Destination 

Change 

Inquire 

Interpret 

Read 

Solicit 

Close Destination 

Close ACB (Internal Only) 

Send 

Receive 

Resetsr 

Sessionc 

- Return Codes to be mapped against RPLRTNCD 
Operation successfully completed 
Invalid REQ or CTL Block 
Logical Error 
Physical Error 

Neg Response to Cond CMD 
Special Condition 
Command Reset 
Command Purged 
VTAM Not Active 
System Error 
Device Disconnected 
NIBResplim Excd. 
Except. REQ. Received 
Except. Resp. Received 
No Input Available 



Reason Code equates for RPLFDB2 if RPLRTNCD = X'08' 

RPLCBERR X'OT Invalid Control Block 

RPLRNORT X'02' No Rtype Specified 

RPLCLSIP X'03' CLSDST in Progress 

RPLSTEAM X'03' Sess. Team in Proc. 

RPLCIDNG X'05' Invalid CID 

RPLILDOP X'06' Bad LDO OP Code 

RPLILSEQ X'07' Bod LDO Sequence 

RPLWANCR X'08' Read not Chained 

RPLSANOD X'OC SOL Any + No Dev Conn 

RPLSANDA X'OD' SOL Any + No Dev Avail 

RPLSTOOD X'OE' SOL to Output Only 

RPLSDE X'OF' SOL + Data Already Expected 



RPL (STRPL) (Continued) 
Constants in ISTRPL (Continued) 



Meaning 



RPLRTOOD 


X'lO' 


RPLWTOI 


X'll' 


RPLEWNS 


X'12' 


RPLEWAU3 


X'13' 


RPLCWTOO 


X'14' 


RPLCWB 


X'15' 


RPLCCCPY 


X'16' 


RPLIDA 


X'17' 


RPLLILDOA 


X'18' 


RPLJTOJ 


X'19' 


RPLM255 


X'lA' 


RPLRI LCP 


X'lB" 


RPLCRIRT 


X'lC 


RPLRIOCC 


XMD' 


RPLEWBLK 


XME' 


RPLCRSDC 


X'lF' 


RPLDOFOD 


X'20' 


RPLIREST 


X'21' 


RPLINVAC 


X'22' 


RPLINVEX 


X'23' 


RPLWBT32 


X'24' 


RPLRMOBN 


X'25' 


RPLCTN32 


X'26' 


RPLWCNVR 


X'27' 


RPLRNFT3 


X'28' 


RPLRCINV 


X'29' 


RPLINVRM 


X'2A' 


RPLATSFi 


X'2B' 


RPLIIINA 


X'2C' 


RPUCNDN 


X'2D' 


RPLIL5IN 


X'2E' 


RPLIICBE 


X'2F' 


RPLOLIPT 


X'30' 


RPLINTNA 


X'3T 


RPLRCLCK 


X'32' 


RPLSDQT 


X'32' 


RPLSDEX 


X'33' 


RPLSDNP 


X'34' 


RPLSCEM 


X'35' 


RPLSCEF 


X'36' 


RPLSNQC 


X'37' 


RPLSINVC 


X'38' 


RPLSDFR 


X'39' 


RPLSNOS 


X'3A' 


RPLSNOUT 


X'3B' 


RPLSNMC 


X'3C' 


RPLSSEQ 


X'3D' 


RPLSINVS 


X'3E' 


RPLSINVR 


X'3F' 


RPLOCEOl 


X'40' 


RPLOCE02 


X'4]' 



Read to Output Only 

Write to Input Only 

Era se to Non 2265/3270 

EAU to Non 3270 

Write Conv to Output Only 

Erase + Conv 

Copy LDO W/CCOR CD 

Invalid Data Area or Length 

Invalid LDO Address 

Jump to Jump 

Over 100 LDOS 

Reset LDO + Other 

Invalid Request Type 

Read LDO W/CC 

Erase + Block 

SOL LDO W/CD 

Device Offline or Discon 

Invalid Reset Type 

Invalid ACB 

Invalid Exist 

Write B lock to 3270 

Read Mod or Buf Non 3270 

Copy to Non 3270R 

WRT CNV. Data Expec, 

Read Not First to 3735 

Reset Cond Illegal 

Invalid Read Mode 

Area too smal for I + I 

I Info not Available 

Int could not DET Name 

Invalid Logon SEQ Int 

CB Error in I + I 

Over Length 'Input' (Trunc) 

Int Info not Available 

Reset Cond with Lock 

DFSYN Attempt Quies. 

Resp.= Ex in RPL 

Prev Sched Unpost. 

Chain Err Mid.bt. 

Chain Err 1st Only 

Quis. send not Req. 

Inv. Cntr. of Option 

Send in DF Reset 

Send in DF Ctl.lnv. 

Resp with Outstn. 

Chase but end Exp. 

Seq Mr not Expect. 

Resp Option Error 

Inv . Resp for Post 

Type not Support List 

Type Invalid 



RPL (ISTRPL) (Continued) 



Constants in 


ISTRPL (Continued) 


Label 


Value 


Meaning 


RPLOCE03 


X'42' 


Acquire invalid Parm 


RPLOCE04 


X'43' 


AppI Never Accepts 


RPLOCE05 


X'44' 


No Preempt Auth 


RPLOCE06 


X'45' 


Preempt has Invalid OPT 


RPLOCE07 


X'46' 


Invalid Nib Option 


RPLOCE08 


X'47' 


Dest Unknown 


RPLOCE09 


X'48' 


Dest Unopenable 


RPLOCEIO 


X'49' 


Not Auth to Opndst or installation Provided Subroutine 
Failed to Provide AppI Nome to interpret 


RPLOCEl 1 


X'4A' 


Dest Unovail - Offline 


RPLOCE12 


X'4B' 


Dest Unavoil - In Use 


RPLOCE13 


X'4C' 


No Logon Found Accept 


RPLOCE14 


X'4D' 


Opndst Canceled 


RPLOCEl 5 


X'4E' 


Device/Mode Incomp. 


RPLOCEl 6 


X'4F' 


Invalid Mode Name 


RPLOCEl 7 


X'50' 


Bhset Name Unknov/n 


RPLOCE18 


X'51' 


Bhset not on Local 


RPLOCEl 9 


X'52' 


Multi Bhsets Specified 


RPLOCE21 


X'54' 


Invalid Request Type 


RPLOCE22 


X'55' 


AppI is Quiescing 


RPLOCE25 


X'58' 


Invalid Logon Addr or Len 


RPLOCE26 


X'59' 


Bhset ID Refected 


RPLOCE27 


X'5A' 


Duplicate Nodes 


RPLOCE28 


X'5B" 


VTAM is Halting 


RPLOCE29 


X'5C* 


VTAM not Active 


RPLOCE30 


X'5D' 


Source Addr of CID 


RPLOCE31 


X'5E' 


CID not Resoluable 


RPLOCE32 


X'5F' 


CID DST not Opened 


RPLOCE33 


X'60' 


No Auth for Pass 


RPLOCE34 


X'61' 


Passer not Own Resource 


RPLOCE35 


X'62' 


Resource not Owned 


RPLOCE36 


X'63' 


Preempt Unopened Device 


RPLOCE37 


X'64' 


Restore of Preempt Failed 


RPLOCE38 


X'65' 


Bhset ID Rejected by NCP 


RPLOCE39 


X'66' 


Invalid Setlogon 


RPLOCE40 


X'67' 


Chnge Inv. for Sess. 


RPLOCE41 


X'68' 


Opndst/Bind Fail. 


RPLVACIN 


X'69' 


Invalid Action 


RPLINVRT 


X'6A' 


Inv . Response Type 


RPLRNOEL 


X'6C' 


Exceeded limit of outstanding RCVCMDS allowed 


RPLRNONA 


X'6D' 


Application not authorized, POl inactive 


RPLRNOSE 


X'6E' 


Reply rejected due to SYNTAX error 


RPLRNOIA 


X'6F' 


Program Operator Interface inactive 


RPLRNOCL 


XVO' 


RCVCMD rejected because program operator application 
is closing 


RPLRNOCE 


X'71' 


Command rejected due to SYNTAX error 


RPLINVL 


X'80' 


ASE Invalid LCCW Code 


RPLINVCF 


X'81' 


ASE Invalid Chaining LCCW 


RPLIECMD 


X'87' 


ASE Invalid Escape CMD 


RPLLGCNT 


X'88' 


Leading Graphs over 15 


RPLESCNT 


X'89' 


ASE Escape CMD Count 


RPLCPCNT 


X'8A' 


Copy LCC Count NE 3 


RPLINDAT 


X'97' 


Inv. Area or Length 


RPLVTAME 


X'AO' 


ASE Miscellaneous 


RPLILRS 


X'Al' 


Incompatible Sysgen 


RPLRDIP 


X'A2' 


Reset in Progress 


RPLUSELE 


X'A3' 


Miscellaneous User Error 



RPL(ISTRPL) (Continued) 



Constants in 


ISTRPL (Conti 


nued) 


Label 


Value 


Meaning 


RPLCTLCF 


X'A4' 


ASE Control Command 


RPLMOLTF 


X'A5' 


ASEOItt Failure 


RP LCD ITS 


X'A6' 


ASE Conflicting Dialog 


RPLCRNF 


X'A7' 


Conv. Reply not Possible 


RPLNUTRM 


X'A8' 


ASE no Uterm Rdte 


RPLELNV 


X'A9' 


ASE Escape LCCW 


RPLNELNV 


X'AA' 


ASE Non-Escape LCCW 


RPLLCH 


X'AB' 


ASE LCCW Count G255 


RPLNORD 


X'AC 


Read not First to BSC Dial in 


RPLINVBS 


X'AD' 


ASE Invalid BTU Resp 


RPLSEQER 


X'AE' 


ASE RSP SEQ Err 


RPLERNR 


X'AF' 


ASE Expected RSP not Received 


RPLOLIPX 


X'BO' 


Overlength Input (Trunc) 


RPLCPYE2 


X'BT 


Copy Wrong Cluster 


RPLRELNP 


X'B2' 


Reset Lock not Allowed 


RPLCPYEl 


X'B3' 


Copy Unopened from Device 


Equates for RPLFDB2 if RPLRTNCD = X'lO' 


RPLRCWNP 


X'OO' 


Reset C was Noop 


RPLYTCTN 


X'80' 


Yielded to Contention 


RPLYADIF 


X'84' 


Yielded + Dialog Init Failure 



Reason Code equates for RPLFDB2 if RPLRTNCD = X'14' 
RPLSTAlf X'OT Storage Allocation Failure 



Reason Code equates for RPlf DB2 if RPLRTNCD = X'lS' 



RPLUSRES 


X'OO' 


User Reset 


RPLRSTSR 


X'OO' 


Resertsr 


RPLSSTRM 


X'OT 


Successful TRM Reset 


RPLUNTRM 


X'02' 


Unsuccessful TRM Reset 


Reason Code 


equates for RPLFDB2 if RPLRTNCD = X'lC 


RPLNCPAO 


X'OT 


NCP Abends Restart OK 


RPLNCPAN 


X'02' 


NCP Abend = Restart NOK 


RPLPCF 


X'03' 


Perm Channel Failure 


RPLANS 


X'04' 


Auto Network Shutdown 


RPLAPPAB 


X'05' 


ASE AppI Abended 


RPLCLOCC 


X'06' 


CLSDST Occurred 


RPLVOFOC 


X'07' 


Vary Offline Occurred 


RPLDISCO 


X'08' 


Disconnect Occurred 


RPLBTHEX 


X'09' 


Buffer Threshold Exceeded 


RPLCLRED 


X'OA- 


Register Cleared 


RPLCPAOL 


X'81' 


Last Operation Purged for NCP Abend - Restart OK 


Reason Code equates for RPlf DB2 if RPLRTNCD = X'24' 


RPLOCSOl 


X'OT 


ASE Unexpected Error 


RPLOCS02 


X'02' 


ASE Srt not Present 


RPLOCS03 


X'03' 


ASE Controlling Mode Offline 



RPL (ISTRPL) (ConHnued) 



Constants in ISTRPL (Contlni. 


jed) 


Label Value 


Meaning 


RPLOCS04 X'04' 


ASE Rdt illegal 


RPLOCS05 X'05' 


ASE no process lock 


RPLOCS06 X'06' 


ASE no RDT lock 


RPLOCS07 X'07' 


ASE no allocation lock 


RPLOCS08 X'08' 


ASE no device lock 


RPLOCS09 X'09* 


ASE could not disconnect 


RPLNFMLK X'OA' 


ASE, no FME lock 


RPLOCSIO XMO' 


Could not obtain EPT/DVT lock 


RPLOCSll XMI' 


ASE, SDTsess.fail. 


Reason Code equates for RPLFDB2 if RPLRTNCD= X'28' 


RPLDIDOL X'BO' 


Disconnect on Dial-Out line 


RPLDIDIL X'90' 


Disconnect on Dial-In line 


Inquire equates for.RPLFDBK 




RPLIACT X'OO' 


APPL active 


RPLIINA Z'04' 


APPL inactive 


RPLINA X'08' 


APPL never accepts 


RPLITNA X'OC 


APPL temp not accepting 


RPLIQUIE X'lO' 


APPL quiescing 



Dec Hex 




ORG SNTENTRY 



ORGSNTWORD1 



SNTP LAG 
Flag byte 



SNTNENTS 
Number of entries in this SNT 



SNTRSRVD 
Reserved to force DWORD BDY 



ORG SNTWORD 1+1 



ORG SNTENTRY + 4 



SNTENTRY 
SNT entry 



SNTWORD 1 
Flag and pointer field 



SNTCBPTR 
PTR to DNCB, ICNCB, LDNCB, ETC 



SNTLOCK 
This will be snt addr when add is done by 
SSCP for Dummy RDTE 



Alphabetical List of Fields 


n ISTSNT 








Field Dec 


Hex 


Field 


Dec Hex 


Field 


Dec Hex 


SNTCBPTR 0009 
SNTENTRY 0008 
SNTFLAG 0008 


0009 
0008 
0008 


SNTLOCK 
SNTNENTS 
SNTRSRVD 


0012 OOOC 
0000 0000 
0004 0004 


SNTW0RD1 


0008 0008 


Flag Meanings 












Hex 

Disp Flag Byte 


Contents 


Bit 
Pattern 


Pattern 
Name 


Pattern 
Meaning 



SNTFLAG Flag Byte 



1 SNTRDTFG RDT Entry Flag, 

1 = RDTE, = NCB 
.1 SNTSNTFG This SNT Entry Contains 

a Pointer to an SNT 

Entry 
. . 1 SNTDUMFG This is SNT for a Dummy 

RDTE it is never Locked 
...1 1111 SNTRSVFG Reserved 



TH (ISTTH) 



Dec 




Hex 







1 


2 


3 


THRLAGl 
TH flag byte 


THDAF 
Destination address 


THOAF 
Original address 


THSNF 
Sequence number 


THDCF 
Data count 







OrgTHFLAG 1 



First Byte of 
THFLAGl 



Org THFLAG+1 



THFLGB 

Header Flag 

Fields 



Alphabetical List of Fields in ISTTH 



THDAF 0002 0002 

THDCF 0008 0008 

THFLAGl 0000 0000 

Flag Meanings 



THFLGB 
THOAF 
THSNF 



He; 



0001 0001 
0004 0004 
0006 0006 



Bit 
Pattern 



Disp Flag Byte Contents 

0000 F irst Byte of THF LAG 1 1111 



0001 THFLGB Header Flag Fields 



Pattern 
Name 

.. THF ID 

n THFLGA 

. . THMPF 

.. THRHI 

. . THCMPLl 

1. (aNM00002 

.1 THAFI 



nil .... THPYF 
.... 11.. THSEF 
11 THCDF 



Pattern 
Meaning 

Format ID 

Header Bit Flags 

Mapping Field 

RH Included Indicator 

RU Complete Indicator 

Reserved 

Expedited Flow 

Indicator 

Priority 
Security 
Reserved 



TH 


(ISTTH2) 










Dec 


Hex 


4 





1 


2 


3 





TH2FLAG1 
Flag Bytes 


TH2DAF 

Destination 

Address 


TH20AF 
Origin Address 


4 


TH2SNF 
Sequence Number 








Or 


gTH2FlAGl 












First Byte of 
TH2FLAG1 








Or 


gTH2FlAGl+l 






1 


1 


Second Byte of 
TH2FLAG1 





Alphabetical List of Fields in ISTTH2 



Field Dec 


Hex 


Field 


Dec 


Hex 


TH2DAF 0OO2 
TH2FL^G1 OOOO 


0002 
0000 


TH20AF 
TH2SNF 


0003 
0004 


0003 
0004 


Flag Meanings 










Hex 
Disp 


Contents 




Bit 
Patter 





First Byte of TH2FLAG1 



Second Byte of 
TH2FLAG1 



nil . 
.... 1 

.... 1 

nil . 
.... 1 


1 

. 
1 



Pattern 


Pattern 


Name 


Meaning 


TH2FID 


Format ID 


. TH2MPF 


Mapping Field 


. TH2RHI 


RH Included Indicator 


TH2CMPLI 


RU Complete Indicator 


. TH2PSI 


Primary-Secondary 




Indicator 


1 TH2AFI 


Expedited Flow Indicator 


. TH2PYF 


Priority Field 


. TH2SEF 


Security Field 


1 TH2CDF 


Reserved 



Constants in ISTTH2 
Label Value 

Values for Format ID Field 



IDO 


B'OOOO" 


FIDO 


IDl 


B'OOOl' 


FID 1 


ID2 


B'OOIO- 


FID 2 



TH (ISnH2) (Confinued) 
Constants in ISTTH2 (Continued) 
Values for Mapping Field 



THCNOSEG B'll' 
THONLY B'll' 
THFIRST B'lO' 
THMIDLE B'OO' 
THIAST B'Or 


No Segmenting 
Only Segment 
First Segment 
Middle Segment 
Last Segment 


Values for Primary-Secondary Indicator 


THCPTOS B'l' 
THCSTOP B'O' 


Primary to Secondary Flow 
Secondary to Primary Flow 


Values for Priority Field 




THCNOPYF B'OOOO' 


No Priority 


Values for Security Field 




THCNOSEF B'OO' 


No Security 


Values for Code Definition Field 




THCNOCDF B'OO' 


No Code Definition 


Standard Values for Flag Bytes 




THSYNREQ X'lCOO' 
THASYREQ X'lDOO' 
THSYNRES X'lEOO' 
THASYRES X'lFOO' 


Normal Request 
Expedited Request 
Normal Response 
Expedited Response 



TIE (ISTTIE) 



Dec Hex 




TIETYPE 
Control block 
hype code 



Org TIETIEA 



First Byte of 
TIETIEA 



Org TIESNA 



Org TIERPHA 



1 



TIELNGTH 
Length in 
bytes 



TIERETCD 
Return code from 
TOLTEP 



TIEREQ 
Tie usage code 



TIETIEA 
Address of next tie 



TIESNA 
Address of symbolic name 



TIERPHA 
Address of RPL header 



TIEPTRl 
First Pointer 



TIEPTR2 
Second Pointer 



Alphabetical List of Fields in ISTTIE 



Field 


Dec 


Hex Field 


Dec 


Hex 


Field 


Dec 


Hex 


TIELNGTH 
TIEPTRl 
TIEPTR2 
TIEREQ 


0001 
0008 
0012 
0003 


0001 TIERETCD 
0008 TIERPHA 
OOOC TIESNA 
0003 TIETIEA 


0002 
0012 
0008 
0004 


0002 
OOOC 
0008 
0004 


TIETYPE 


0000 


0000 


Flag Meanings 














Hex 
Disp 




Contents 


Bit 
Pattern 


Pattern 
Name 




Pattern 
Meaning 


0004 




First Byte of TIETIEA 


1.. 




TIEGATE 




Gating Flag 



Constants in ISTTIE 

Label Value Meaning 

TITYPE X'18' Type Code for TIE 



TIE (ISTTIE) (ConMnued) 

Constants in ISTTIE (Continued) 

Label Value Meaning 

TIE Usage Codes 

TIEREQO RFT REQ Passed to TOLTEP 

TIEREQr 1 Vary Passed FSB to TOLTEP 

TIEREQ2 2 Vary Passed NCSPL to TOLTEP 

TIEREQ3 3 Req. for an End-OL to Vary 

TIEREQ4 4 Req. for Freeing Buffers 

TIEREQ5 5 TOLTEP REQ Info from SSCP 

TIEREQ6 6 TOLTEP Pass LCPB to Vary 

TIEBASIC Basic Support for Device RFT Received for 

TIERCRD 4 Record Support for Device RFT Received for 



The following service aids are available for VTAAA: 

. Buffer Trace 

. I/O Trace 

. Line Trace 

. NCP Dump 

. VTAM Dump Facility 

A complete description of these and other relevant service aids can be found in the 
DOS/VS VTAM Debugging Guide, GC27-0021 . 



CHAPTER III 

VSAM CONTROL BLOCKS 



VSAM CONTROL BLOCK STRUCTURE FOR A KEY-SEQUENCED DATA SET 
User's record management request: VSAM user: 



GET,PUT,POlNT,ERASE,c 


rENDREO 


1 




.. . .4 


. J 









ISAM user: 
Rl 



t DTFIS 


DTFIS 






X"ll' LOGMODAD 


X'2C' AMDTFAD 


X'30' CIPROCAD 



X'90' ACBAD 



X'9C' DTFISAD 



Note: Present only if 
using IIP 



DOS/VS 
COMREG 





ilPPRCPR 




Branch vector 




Address table 





n 



t RPL 



Describes the VSAM 
record processing 
request 



X'18' t ACB 



Describes the VSAM 
data set 



X'04' t AMBL 



X'08' t Record 
management 
load module 

X'30' I EXLST 



x'nr' —1 



X'04' 
t Data AMDSB 



t Index AMDSB 
X'OC 

t PLFTs 

X'M' 

t ACB 



User exit routin 



t EODAD 



t JRNAD 



See figure: 
Data and Index 



DATA AND INDEX CONTROL BLOCK STRUaURE 



AMBL 






Data AMDSB 




EDB 




EDB's 




Describes an opened 
cluster 




Statistical 
information 




Describes a disk extent 
(lEDB for each extent) 








1 . 












* 












i_ 




1 






X'04' 
+ Data AMDSB 


X'CO' 
t EDB 


X'OO' 
tNext EDB 


1 














X'08' 
t Index AMDSB 




X'24' 
t ARDB 








X'14' 
tLPMB 


Data ARDBs 










1 


. 




1 


X'OC 
1 PLH's 






X'AC 
t BCB 


tARDB 




'^ 


(RBA) for each key 
range 




1 
















X'14' 
+ ACB 


X'B4' 

t CCW build area 








X'llO' 
t EDB 








X'54' • 
f PLHs of base cluste 










LPMB 




X'14' 

t Index ARDB 


PI Mc 




Describes physical 
disk attributes 




X'58' • 
lUSB 


















1 




Information about 
current request 






1 
































b«-t}S 






t RPLs 




Data BHD 






Status info about a 
buffer(l for each buffer) 


i 






Information about 
buffers 






1 












^ 






t ECB 




: ^ 






Same control block 
structure as data 
AMDSB 








X'04' 
4 Buffer 


t Current ARDB 






X'14',X'10',X'18',XMC' 
t Buffer queues 












X'44' 

f next BCB in queue 


X'lM' 

f BHD(DATA)XM18 
INDEX BHD 


















1 




The base cluster AMBL 
points to the USB . The 
AIX AMBLs points to thie 
PLHs of the base cluster. 




Data free / data I/O queue ' 


1 1 




f Current BCB 




BCB 




i 






Buffers 




t Current buffer 
f THB 


^ 


r^ i 


- 


i 


BCB 




; 






1 














1 



MULTIPLE STRING CONTROL BLOCK STRUCTURE 




Rl during 
execution of 
subtask 2 



i RPL2 






* 


Rl during 
execution of 
subtask n 




RPLn 1 


t RPLn 









Note: PLHl is not permanently assigned to RPLl, etc. 
PLHs are assigned as required. 



BASE CLUSTER TO ALTERNATE INDEX CONTROL BLOCK STRUCTURE 





Alternate Index 1 




path 


RPL 


1 


entry 


n 


1 


ACB i 




Alternate index 3 




ACB 


1 


n 


AMBL i 


1 1 


PLH i 


1 1 


RPL i 


1 1 





CATALOG MANAGEMENT CONTROL BLOCKS 



t Label cylinder info 



t DADSM 
parameter list 



-® 



{* ACB (c. 



t catalog record 
in g buffer 



' 's to fields i 
the buffer 



t RPL (current) 



t Next available 

space in work area (c) 



t CMS work area 



t CRA definition 
work area 



! CRA buffer chain 



-® 



256-byte label record 



DADSM parameter list 



f Label cylinder info 



^ I/O area 



VTOC information 



ACB (Master catalog) 



Describes the catalog «- 
L>J OS a VSAM key- 
sequenced data set 



RPL^ (Master catalog) 



Describes the VSAM 
record processing 



DOS/VS_ 



AMCBS 



Interface between 
ANCHTond the VSAM 
catalog control 
blocks 



CAXWA chain 



¥ 's control blocks 
and work areas 
needed for catalog 
processing 



~C 



© 

® \ See fig.: CALLER-SUPPLIED 
^\ CONTROL BLOCKS 

^J I^OR CATALOG — 

MANAGEMENT 



Control blocks for further 
catalogs and CRAs(if present) 

I 

ACB (job catalog) 



RPLs(iob catalog) 



ACB(e.q. user catalo g) 



RPLs(e.g. user catalo g) 



ACB (e.g. CRA) 



RPLs (e.g. CRA) 



CALLER-SUPPLIED CONTROL BLOCKS FOR CATALOG MANAGEMENT 



r\_# t Catalog 
,i(Je ntifier 



t Catalog record 
identifier 



t FVT 



Information for 
locati ng the CRA 

t FPL 



t FPL 



■W9rk flrgg 



/pv_^ Available space 



4 Field name 
Test condition 



t FPL=0: 
no more tests, oi 
t FPL for next 
test 



t Test data 



t's to user-supplied 
information fields and 



♦ Work area: 
Update data or field's 
(retrieved) data and 
length 



FVT (data) 



FVT (index) 



FVT (space) 



I * 



X S o 
82- 



ACCESS METHOD BLOCK LIST (AMBL) 



Disp 


acement 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit _j 












AMBLST 




Beginning of AMBL 




1 




1 




AMBLID 
AMBLACT 


X'lT 


AMBL identifier 
AMBL active byte 


2 


2 




AMBLLEN 




Length of control block 


4 


4 




AMBLDTA 




Pointer to data AMDSB 


8 


8 




AMBLIX 




Pointer to index AMDSB 


12 


C 




AMBLPLHF 




Pointer io first PLH 


16 


10 




AMBCHAIN 




Reserved 
Pointef to ACB 


20 


14 




AMBLACB 




24 


18 




AMBLPLHL 




Lengtd of PLH 

Total number of strings 


26 


lA 




AMBLPLHN 




27 


IB 




AMBLFIAG 




Flag byte 








AMBLPOST 


X'80' 


POST must be issued 


28 


IC 


4 


AMBAMBUF 




Size of buffer space 


32 


20 


2 


AMBMACRF 




Flogs (copy of flags in 
ACBMACRl and 
ACBMACR2) 


32 


20 


1 


AMBMACRl 




First byte: 








AMBKEY 


X'80' 


Access data via index on RR # 








AMBADD 


X'40' 


Access via RBA 








AMBADR 


X'40' 


Access via RBA 








AMBCNV 


X'20' 


Control interval processing 








AMBSEQ 


X'lO' 


Sequential processing 








AMBDIR 


X'08' 


Direct processing 








AMBIN 


X'04' 


GET, READ processing 








AMBOUT 


X'02' 


PUT, WRITE processing 








AMBUBF 


X'Ol' 


User buffers 


33 


21 


1 


AMBMACR2 




Second byte: 








AMBLSR 


X'80' 


Localshared Resource 








AMBDFR 


X'40' 


Deferwriting OF Buffers 








AMBSKP 


X'20' 


Skip sequential accessing 








AMBRST 


X'lO' 


Reusable Data Set 








AMBAIX 


X'08' 


AIX processing 








AMBJRACT 


X'02' 


JRNAD EXIT ENABLED 








AMBOPEN 


X'Ol' 


Open is in process 


34 


22 


2 


AMBIT LEN 




Length of GETVIS for 
AMBL, PLH, etc. 


36 


24 


2 


AMBDBUF 




Number of data buffers 


38 


26 


2 


AMBIBUF 




Number of index buffers 


40 


28 


4 


AMBLOPWA 




Pointer to open work area 


Split Control | 


44 


2C 


4 


AMBSECB 




Split/speudo-split ECB 


44 


2C 


1 


AMBSO 




Reserved 


45 


2D 


1 


AMBSl 




Reserved 


46 


2E 


1 


AMBSCOM 




ECB post byte 








AMBSWAIT 


X'80' 


Wait bit share 


47 


2F 


1 


AMBSECBT 




Share gate test and set byte 


48 


30 


4 


AMBBECB 




ECB fo Buffer Manager 


48 


30 


1 


AMBBO 




Reserved 


49 


31 


1 


AMBBl 




Reserved 


50 


32 


1 


AMBBCOM 




ECB Post byte 








AMBBWAIT 


X'80' 


Wait bit-buffer manager 



ACCESS METHOD BLOCK LIST (AMBL) (. . .Continued) 



Displacement 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 




51 


33 




AMBBECBT 




Buffer gate-test and 
set byte 


52 


34 




AMBLORBA 




Low RBA of control area 
being split 


56 


38 




AMBHIRBA 




High RBA of control area 
being split 


60 


3C 




AMBSTRID 




ID of string which holds 
control area 


•61 


3D 








RESERVED 


,64 


40 


4 


AMBPLH 




Address of PLH in control 


Pointers | 


68 


44 


4 


AMBALIST 




address of RSCB list 


72 


48 




AMBLRPLS 




Address of RPL causing split 


76 


4C 




AMBLCLWA 




Pointer to close work area 


80 


50 




AMBLCIWA 




Pointer to CI split work 
area 


84 


54 


4 


AMBLBC 




Pointer to base cluster PLH Pool 


88 


58 


4 


AMBLUSB 




Pointer to USB 


92 


5C 




AMBBCACB 




Pointer to BASECLUSTER-ACB 


96 


60 




AMBPEACB 




Pointer to PATH ENTRY -ACB 


100 


64 




AMBLRPHD 




Pointer to resource Pool Header 



ACCESS METHOD CONTROL BLOCK (ACB) 



Displacement 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 










1 


ACBID 




ACB identifier = 'AO' 








ACBIDD 


X'AO' 


ACB equate 








ACBIDVAL 


X'AC 


ACB equate 


1 


1 


1 


ACBSTYP 




X'OO' VSAM Release 1 
X'lO' VSAM Release 2 
X'20' VTAM 


2 


2 


2 


ACBLEN 




Length of ACB in bytes 


2 


2 


2 


ACBLENG 




Length of ACB in bytes(l) 


4 


4 


4 


ACBAMBL 




Address of the AMBL 


8 


8 


4 


ACBAMO 




Pointer to VSAM code 


12 


C 


1 


ACBACT 




ACB Active Byte 


13 


D 


1 


ACBINFLG 




Catalog Recovery Flags 








ACBSCRA 


X'80' 


ACB is for a System- 
Initiated open of the CRA 








ACBUCRA 


X'40' 


ACB is for a User- 
Initiated open of the CRA 








ACBSTSKP 


X'08' 


SKIPUPDATING of 
statistics 


14 


E 


2 


ACBDBUF 




Number of data buffers 


14 


E 


2 


ACBBUFND 




Number of data buffers 


16 


10 


2 


ACBIBUF 




Number of index buffers 


16 


10 


2 


ACBBUFNI 




Number of index buffers 


18 


12 


2 


ACBMACRF 




MACRF 


18 


12 


1 


ACBMACRl 




MACRF first byte 








ACBKEY 


X'80' |7 


xcess data via index or RR # 








ACBADD 


X'40' 


Access via RBA 








ACBADR 


X'40' 


Access via RBA 








ACBCNV 


X'20' 


Control interval processing 








ACBSEQ 


X'lO' 


Sequential processing 








ACBDIR 


X'08' 


Direct processing 








ACB IN 


X'04' 


GET 








ACBOUT 


X'02' 


PUT 








ACBUBF 


X'Ol' 


User buffers 


19 


13 


1 


ACBMACR2 




MACRF second byte 








ACBLSR 


X'80' 


Local Shared Resource 








ACBDFR 


X'40' 


Defer Writing of Buffers 








ACBSKP t 


X'20' 


Skip sequential access 








ACBRST 


X'lO' 


Reusable data set 








ACBAIX 


X'08' 
X'04' 


AIX processing 
Reserved 








ACBJRACT 


X'02' 
X'Ol' 


JRNAD Exit Active 
Reserved for open AMBL 


20 


14 


1 


ACBDOSID 




DOS DTF Identifier 








ACBDTFID 


X'28' 


DTF type for VSAM 


21 


15 


1 


ACBOFLGS 




Open/close flags 








ACBVOLMT 


X'80' 


Verify volume mounted 








ACB VMS G 


X'40' 


Message requested bit 








ACBEOV 


X'20' 


EOV detects completed 








ACBOPEN 


X'lO' 


ACB is open 








ACB CAT 


X'08' 


ACB for VSAM catalog 








ACBEXFG 


X'04' 


User exit flag 








ACBSUB 


X'02' 


ACB is Subal located 



I 



(1) If specified length Is too small for a VSAM Release 2 ACB a Rele< 
built (X'OO' in byte 1). 



ACCESS METHOD CONTROL BLOCK (ACB) (. ■ .Continued) 



Displacement 


Bytes 


Field Name 


Hex 


Description 


Dec Hex 






Digit 








ACBKEYOK 


. X'Ol' 


Key processing all right 
for this ACB 


22 16 


1 


ACBNST 




Number of strings 


22 16 


1 


ACBSTRNO 




Number of strings 


23 17 


1 


ACBERFLG 




Error flags 

Open error return codes : 






ACBOALR 


X'04' 


This ACB is already open 






ACBOLLUB 


X'OE' 


The symbolic unit in the 
DLBL statement is invalid 






ACBONJIB 


X'OF- 


No |ob information blocks 
(J IBs) are available from 
the label information 
cylinder. 






ACBOLIGN 


X'll' 


The address in the 
ASSIGN statement for the 
logical unit was IGN 
(assignment ignored). 






ACBOLUNA 


X'12' 


The address in the 
ASSIGN statement for the 
logical. unit v/as UA 
(logical unit unassigned). 






ACBOaXT 


X'22' 


The volume serial numbers 




j 




specified in the EXTENT 








statement do not match 










those specified in the 










catalog entry. 






ACBOCDLD 


X'32' 


Unable to load VSAM 
modules via a CDLOAD 
macro instruction. 






ACBONMNT 


X'50' 


Attempt to mount two 
volumes on the same drive 
when direct or keyed 
processing was specified. 
Or the operator failed to 
mount the volume. 






ACBONCRA 


X'5C' 


CRA volume not mounted 






ACBOIERR 


X'60' 


Unusable input data set 






ACBOUEMP 


X'64' 


Empty upgrade AIX 






ACBOTMST 


X'68' 


The time stamp of the 
volume on which a data 
set is stored doesn't match 
the system time stamp in 
the volume catalog entry. 






ACBOTIME 


X'6C' 


The system time stamp of a 
data set and its index do 
not match, this indicates 
that the data has been up- 
dated separately. This 
test is greater than or 
equal, i.e., no warning 
is given if the index time 
stomp is greater than the 
data time stamp. 






ACBOEMPT 


X'6E' 


Open empty data set for 
read only. 



ACCESS METHOD CONTROL BLOCK (ACB) (...Continued) 



Displacement 


Bytes 


Field Name 


Hex 


Description 


Dec Hex 






Digit 








ACBODSNC 


X'74' 


Data set was not closed the 
last time it was processed 






ACBODEVT 


X'75' 


The symbolic unit specified 
in the EXTENT statements 
is not a valid VSAM 
device type. 






ACBONDLB 


X'80' 


The D LB L statement is 
missing or the filename in 
the DLBL doesn't match the 
ACB. 






ACBOIOER 


X'84' 


A permanent I/O error 
occurred while VSAM was 
reading label information 
from the label information 
cylinder. 






ACBONVRT 


X'88' 


Not enough virtual storage 
space is available in the 
partition for work areas, 
control blocks, or buffers. 






ACBOIOCA 


X'90' 


A permanent I/O error 
occurred while VSAM was 
reading or writing a 
catalog entry. 






ACBONCAT 


X94 


N. ENTRY found in the 
catalog for this ACB. 






ACBOSECU 


X'98' 


Security verification failed; 
the password specified in 
the ACB for a specific level 
of access doesn't match the 
password in the catalog for 
that level of access. 






ACBOPARC 


X'AO- 


The operands specified in 
the ACB are inconsistent 
with each other or with the 
information in the catalog 
entry, for example, an open 
of an ESDS for keyed 
processing. 






ACBOKBUF 


X'Al' 


User-specified buffers with 
keyed access (user buffers 
can be specified only with 
CNV access). 






ACBOIOVL 


X'A4' 


A permanent I/O error 
occurred while VSAM was 
reading the volume label of 
the volume the data is set on. 






ACBONAVA 


X'A8' 


The data set is not available 
because it is being updated 
by (under the exclusive 
control of) another ACB or 
has been exported by 
Access Method Services. 



ACCESS METHOD CONTROL BLOCK (ACB) (...Continued) 



Displacement 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 










ACBONOCT 


X'B4' 


The VSAM catalog is not 
connected to the system 
on logical unit SYSCAT. 
or insufficient virtual 
storage available for OPEN 








ACBOACT 


X'BC 


ACB was active 








ACBOOERR 


X'CO' 


Unusable output data set 








ACBOPEMP 


X'C4' 


Access via empty path 








ACBODSCB 


X'C8' 


DSCB format 4 error 








ACBOCNVP 


X'EO' 


Invalid control interval 
procedure 








ACBONRST 


X'E8' 


Non-reusable is not empty 








ACBOCTER 


X'FF' 
X'02' 


Unexpected return from 
catalog locate function. 

Close error return codes : 

Invalid control block or 
ACB address not in OAL 








ACBCALR 


X'04' 


ACB already closed 








ACBCNVRT 


X'88' 


insufficient space available 
in user's partition for 
work area 








ACBCIOCA 


X'90' 


Pemianent I/O error 
occurred while VSAM was 
reading or writing a 
catalog entry. 








ACBCNCAT 


X'94' 


No catalog entry found 








ACBCIOER 


X'B8' 


Permanent I/O error 
occurred while VSAM was 
completing outstanding 
I/O requests. 








ACBCBUSY 


X'BC 


ACB busy 


24 


18 


4 


ACBAMBUF 




Length of buffer pool 


28 


IC 


8 


ACBDDNM 




DDname 


36 


24 


4 


ACBPRTCT 




Pointer to password 


40 


28 


4 


ACBUAPTR 




Pointer to user work area 


44 


2C 


4 


ACBBFPL 




Pointer to first data buffer 
in buffer pool 


48 


30 


4 


ACBEXLST 




User exit list pointer 


52 


34 


4 


ACBNXT 




Reserved 


56 


38 


1 






Reserved for BSTRNO 


57 


39 


1 






RESERVED 


58 


3A 


2 


ACBMSGLN 




Message area length 


60 


3C 


4 


ACBMSGAR 




Message area 


64 


40 


4 






RESERVED 



ACCESS METHOD CONTROL BLOCK STRUCTURE BLOCK (AMCBS) 



Displacement 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 






1 




1 


1 

1 


CBS ID 
CBSFLAGS 


X'OO' 


AMCBS identifier 
AMCBS flags 








CBSJCAT 


X'80' 


Job catalog not present 


2 


2 


2 


CBSSIZ 




Length of the AMCBS 


4 


4 


4 


CBSCRACB 




Pointer to CRA ACB 


8 


8 


4 


CBSACB 




Pointer to ACB (Master) 


12 


C 


4 


CBSCRAPL 




Pointer to AMS 
CRAAP list 


16 


10 


4 


CBSSYSUC 




Pointer to job catalog 
ACB 


20 


14 


4 


CBSCAXCN 




Pointer to CAXWA 
chain 


24 


18 


4 


CBSCBMM 




Pointer to control 
Block Manibulation 
Macro Load Module 



ACCESS METHOD DATA STATISTICS BLOCK (AMDSB) 



Displacement 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 










96 


AMDSBCOM 




Common part 




1 




1 


1 
1 


AMDSBID 
AMDATTR 
AMDATTRl 


X'60' 


AMDSBidentifier 
Attributes of the data set 
Attributes (first byte) : 








AMDDST 


X'80' 


Key-sequenced data 

set 1 

Entry-sequenced data 
set 








AMDWCK 


X'40' 


Check each record when 
it is written 








AMDSDT 


X'20' 


Sequence set is stored 
with the data 








AMDREPL 


X'lO' 


Replication 








AMDORDER 


X'08' 


Use the volumes in the 
same order as the 
volume list 








AMDRANGE 


X'04' 


The data set is divided 
into key ranges 








AMDRRDS 


X'02' 


Relative record data set 








AMDS PAN 


x'or 


Spanned records 


2 


2 


2 


AMDLEN 




Length of AMDSB in the 
catalog 


4 


4 


2 


AMDNEST 




Number of Entries in 
Index Section 


4 


4 


2 


AMDAXRKP 




Rel. Key Position, AIX 


6 


6 


2 


AMDRKP 




Rel. key Position, BASE 


8 


8 


2 


AMDKEYLN 




Key length 


10 


A 


1 


AMDPaCA 




Percentage of free 
control intervals in the 
control area 


11 


B 


1 


AMDPaCI 




Percentage of free bytes 
in the control interval 


12 


c 


2 


AMDCIPCA 




Number of control 
intervals in a control 


14 


E 


2 


AMDFSCA 




Number of free control 
intervals in a control 


16 


10 


4 


AMDFSCI 




Number of free bytes in 
a control interval 


20 


14 


4 


AMDCINV 




Control interval size 


24 


18 


4 


AMDLRECL 




Maximum record size 


28 


1C 


4 


AMDHLRBA 




RBA of the high-level 
index record 


28 


1C 


4 


AMDNSLOT 




Number of relative 
record slots 


32 


20 


4 


AMDSSRBA 




RBA of first seq. record 


32 


20 


4 


AMDMAXRR 




Max. relative record 
number 


36 


24 


4 


AMDPARDB 




Pointer to first ARDB 



ACCESS METHOD DATA STATISTICS BLOCK (AMDSB) (...Continued) 



Displacemenf 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 




40 


28 


1 


AMDATTR3 




Attributes 








AMD UNO 


X'80 
X'40 
X'20 
XMO 
X'08 
X'04 
X'02 
X'Ol 


0=unique; l=non-unique 

Reserved 

Reserved 

Reserved 

Reserved 

Reserved 

Reserved 

Reserved 


41 


29 


3 






Reserved 


44 


2C 


4 






Reserved 


Statistics 


48 


30 


4 


AMDSTAT 




Statistics 


48 


30 


8 


AMDSTMST 




System time stamp 


48 


30 


8 


AMDSTSP 




System time stomp 


56 


38 


2 


AMDNIL 




Number of index levels 


58 


3A 


2 


AMDNEDB 




Number of EDBs 


58 


3A 


2 


AMDNEXT 




Number of extents in the 
data set 


60 


3C 


4 


AMDNLR 




Number of user-supplied 
(logical) records in the 
data set 


M 


40 


4 


AMDDELR 




Number of deleted records 


68 


44 


4 


AMDIREC 




Number of inserted records 


72 


48 


4 


AMDUPR 




Number of updated records 


76 


4C 


4 


AMDRETR 




Number of retrieved 
records 


80 


50 


4 


AMDASPA 




Number of bytes of free 
space in the data set 


84 


54 


4 


AMDNCIS 




Number of times a control 
interval was split 


88 


58 


' 


AMD N CAS 




Number of times a control 
area was split 


92 


5C 


4 




AMDEXCP 
AMDCOMM 




Number of times EXCP was 
issued by VSAM I/O 
routines 


General Continue ] 


96 


60 


1 


AMDSHOPT 




Share option byte 








AMDSHRl 


X'80 


Share option 1 








AMDSHR2 


X'40 


Share option 2 








AMDSHR3 


X'20 


Share option 3 








AMDSHR4 


XMO 


Shore option 4 


97 


61 


4 


AMDCDSN 




Pointer to catalog ACB 


101 


65 


3 


AMDDSN 




Catalog control interval 
number for data (index) 


104 


68 


4 


AMDHWRBA 




High-water RBA for the 
data set 



ACCESS METHOD DATA STATISTICS BLOCK (AMDSB) (. . .Confinued) 



Displacement 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 




108 


6C 


1 


AMDAnR2 




Attributes (second byte): 








AMDREL 


X'80* 


Release unused space 








AMD LOAD 


X'40' 


Load mode 








AMDSPEED 


X'20' 


Speed option 








AMDINDX 


X'lO- 


Index option 








AMDSHR 


X'08' 


Sharing 








AMDKR 


X'04' 


Key-range processing, 
duplicate of 
AMD RANGE 








AMD CAT 


x'or 


AMDSB for catalog 


109 


6D 


.1 


AMDACT 




AMDSB test and set byte 


110 


6E 


..2 


AMDFILT 




User area (ISAM 
compatibility) 


112 


70 


4 


AMDPVOL 




Pointer to volume list 


116 


74 


1 


AMDAMS 




AAAS flag byte 








AMDAIX 


X'80' 


Alternate index 








AMDPATH 


X'40' 


Access via path 








AMDBASE 


X'20' 


Access via base 


117 


75 


1 






Reserved 


118 


76 


2 


AMDAIRKP 




AIX relative key 
position 


Local StotisHcs | 


120 


78 


4 


AMDLSTAT 




Local statistics 






2 


AMDLNIL 




Local number of index 
levels 


122 


7A 


..2 


AMDLNEST 




Local number of entries 
in the index section 


124 


7C 




AMDLNLR 




Local number of user- 
supplied (logical) records 


128 


80 




AMDLDELR 




Local number of deleted 
records 


132 


84 




AMDLIREC 




Local number of inserted 
records 


136 


88 




AMDLUPR 




Local number of updated 
records 


140 


8C 




AMDLRETR 




Local number of retrieved 
records 


144 


90 




AMDLASPA 




Local bytes of free space 


148 


94 




AMDLNCIS 




Local number of control 
interval splits 


152 


98 




AMD LN CAS 




Local number of control 
area splits 


156 


9C 




AMDLEXCP 




Local number of EXCPs 
issued by VSAM I/O 
routines 


Exceptional Exit 


160 


AO 


8 


AMDEXEXT 




Exception exit 



ACCESS METHOD DATA STATISTICS BLOCK (AMDSB) (.. -Continued) 



DIspIa 


cement 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 




Buffer Management Information 


168 


A8 


2 


AMDBCBNO 




Number of buffers 


170 


AA 


2 


AMDBFREE 




Number of unassigned 
buffers 


172 


AC 


4 


AMDFSBCB 




Address of the first 
BCB* 


176 


BO 


4 


AMDFFBCB 




Address of the first 
free BCB 


180 


B4 


4 


AMDCCWA 




Pointer to CCW build 
area 


184 


B8 


8 






Reserved 


EDB Header 


192 


CO 


4 


AMDFSEDB 




Address of first EDB 


196 


C4 


2 






Reserved 


198 


C6 


..2 


AMDLEDB 




Length of EDB 



' For LSR: Address of the BSPH. 



ACCESS METHOD DEFINE THE FILE (AMDTF) TABL£ 



Displacement 


Bytes 


Field Name 


Hex 
Digit 


Description 


Dec 


Hex 








72 


SAVARPP 




Used to store register 
contents of problem 
program 


72 


48 


72 


SAVARCI 




ISAM interface 
program save area 


144 


90 


4 


ACBAD 




Address of ACEf) Used 
by 
^IIPOPEN 
to open 


148 


94 


4 




X'0A020000' 


SVC 2 J the ACB 


152 


98 


4 


RPLAD 




Address of RPL 


156 


9C 




EREPL 




Error exit parameter list 


156 


9C 


4 


DTFISAD 




Address of DTFIS 


160 


AO 


4 


EPLRECAD 




Address of record in 
error (not supported by 
IIP) 


164 


A4 


8 


EPLDASDA 




DASD address of record 
in error (not supported 
by IIP) 


172 


AC 


1 


EPLRECID 




Record identification 








EPLRECID 


X'80' 


Data record (VSAM 
data set) 








EPLXREC 


X'40' 


Index record (VSAM 
sequence set) 








EPLCXREC 


X'20' 


Cylinder index record 
(VSAM index set) 








EPLMXREC 


X'lO' 


Master index record 
(VSAM index set) 








EPLREAD 


X'02' 


Read 








EPLWRITE 


x'or 


Write 


173 


AD 


1 


EPLCMNDC 


X'OO' 


Command code of 
failing CCW (not 
supported by IIP) 


174 


AE 


2 






UNUSED 


176 


BO 




GENACB 




GENCB information to 
generate the ACB 


176 


BO 


4 


GACBHAD 




Address of header 


180 


B4 


4 


MACRFEAD 




Address of MACRF 
element 


184 


B8 


4 


FILENEAD 




Address of filename 
element 


188 


BC 




GACBH 




Header 


188 


BC 


1 


GACBBTC 


X'AO' 


Block-type code (ACB) 


189 


BD 


1 


GACBFTC 


x'or 


Function-type code 
(GENCB) 


190 


BE 


2 


GACBNOC 


x'ooor 


Number of copies 
(1 copy) 


192 


CO 


4 


GACBWAAD 




Address of work area 
set to 0; VSAM obtains 
space via GETVIS 


196 


C4 


4 


GACBWALN 




Length of work area 



ACCESS METHOD DEFINE THE FILE (AMDTF) TABLE (. . . .Cont'd) 



Displacement- 


Bytes 


Field Name 


Hex 
Digit 


Description, 


Dec 


Hex 


200 


C8 




MACRFEL 




AAACRF element 


200 


C8 


4 


MACRFKTC 


X'OO 120000' 


Keyword-type code 


204 


CC 


4 


AMCRFVAL 




Value supplied by 
IIPOPEN 


208 


DO 




FNAMEEL 




File name (DDname) 
element 


208 


DO 


4 


FNAMEKTC 


X'00090O00' 


Keyword-type code 


212 


D4 


8 


FNAMEACB 




File name (inserted 
by liPOPEN) 


220 


DC 




GENRPL 




GENCB information 
to generate the RPL 


220 


DC 


4 


GRPLHAD 




Address of header 


224 


EO 


4 


ARLNEAD 




Address of AREALEN 
element 


228 


E4 


4 


ACBEAD 




Address of ACB element 


232 


E8 


4 


KEYLNEAD 




Address of KEYLEN 
element 


236 


EC 


4 


RECLNEAD 




Address of RECLEN 
element 


240 


FO 




GRPLH 




Header 


240 


FO 


1 


GRPLBTC 


X'CO' 


Block-type code (RPL) 


241 


Fl 


1 


GRPLFTC 


x'or 


Function-type code 
(GENCB) 


242 


F2 


2 


GRPLNOC 


X'OOOl' 


Number of copies 
(1 copy) 


244 


F4 


4 


GRPLWAAD 




Address of work area 
set to 0; VSAM obtains 
space via GETVIS 


248 


F8 


4 


GRPLWALN 




Length of work area 
set to 


252 


FC 




ARLNEL 




AREALEN element 


252 


FC 


4 


ARLNKTC 


X'OO2D0O00' 


Keyword-type code 


256 


100 


4 


ARLNVAL 




Area Length 


260 


104 




ACBEL 




ACB element 


260 


104 


4 


ACBKTC 


X'002B0000' 


Keyword-type code 


264 


108 


4 


ACBADl 




Address of ACB 


268 


IOC 




KEYLNEL 




KEYLEN element 


268 


IOC 


4 


KEYLNKTC 


X'00300O00' 


Keyword-type code 


272 


110 


4 


KEYLNVAL 




Key length 


276 


114 




RECLNEL 




RECORDLEN element 


276 


114 


4 


RECLNKTC 


X'00350O00' 


Keyword-type code 


280 


118 


4 


RECLNVAL 




Record length 


284 


lie 




SHOWCB 




Information to show 
ACB or RPL 


284 


lie 


4 


SHHAD 




Address of header 


288 


120 


4 


SHEAD 




Address of element 


292 


124 




SHH 




Header 


292 


124 


1 


SHBTC 


X'OO' 


Block-type code 


293 


125 


1 


SHFTC 


X'03' 


Function-type code 
(SHOWCB) 


294 


126 


2 


SHOTC 


X'OOOO' 


Object-type code 


296 


128 


4 


SHBAD 




Address of block to be 
shown 



ACCESS METHOD DEFINE THE FILE (AMDTF) TABLE (. . . .Cont'd) 



Displacement 


Bytes 


Field Name 


Hex 
Digit 


Description 


Dec 


Hex 


300 


12C 


4 


SHARAD 




Address of area 


304 


130 


4 


SHARLN 




Length of area 


308 


134 


4 


SHAR 




Area where information 
is to be placed 


312 


138 




SHEL 




Element 


312 


138 


4 


SHKTC 




Keyword -type code 
(set by IIP) 


316 


13C 




MODRPL 




MODCB information 
to modify the RPL 


316 


13C 


4 


MRPLHAD 




Address of header 


320 


140 


4 


OPTCDEAD 




Address of OPTCD element 


324 


144 


4 


AREAEAD 




Address of AREA element 


328 


148 


4 


ARGEAD 




Address of ARG element 


332 


14C 




MRPLH 




Header 


332 


14C 


1 


MRPLBTC 


X'CO' 


Block-type code (RPL) 


333 


14D 


1 


MRPLFTC 


X'02' 


Function -type code 
(MODCB) 


334 


14E 


2 






UNUSED 


336 


150 


4 


MRPLBAD 




Address of block to be 
modified (supplied by 
IIPOPEN) 


340 


154 




OPTCDEL 




OPTCD element 


340 


154 


4 


OPTCDKTC 


X'00340000' 


Keyword-type code 


344 


158 


4 


OPTCDVAL 




Bit pattern (supplied by IIP 


348 


15C 




AREAEL 




AREA element 


348 


15C 


4 


AREAKTC 


X'002C0000' 


Keyword -type code 


352 


160 


4 


AREAAD 




Address of area (supplied 
by IIP) 


356 


164 




ARGEL 




ARG element 


356 


164 


4 


ARGKTC 


X'002E0000' 


Keyword-type code 


360 


168 


4 


ARGAD 




Address of ARG parameter 
(supplied by IIP) 


364 


16C 




MSGOUT 




Header 


364 


16C 


16 


MSCCB 




CCB 


380 


17C 


4 






Zeros 


384 


180 


8 


MSCCW 




CCW 


392 


188 


6 


ERRCDE 




Error code of message 


398 


18E 


5 


ISAMCM 




■ISAM' 


403 


193 


9 


ISCM 




ISAM command area 


412 


19C 


5 


VSAMCM 




'VSAM' 


417 


lAl 


9 


VCCM 




VSAM command area 


426 


lAA 


4 


CRCM 




'RC=' 


430 


lAE 


5 


CRCl 




Return code area 


435 


1B3 


20 


SHOWCBF 




Area if SHOWCB failed 


455 


1C7 


5 


CRC2 




Return code from SHOWCB 


460 


ICC 


4 


CRSCM 




■EC=' 


464 


IDO 


4 


CRSC 




Error code area 


468 


1D4 


1 


BRKT 




Closing bracket 



ADDRESS RANGE DEFINITION BLOCK (ARDB) 



Displacement 


Bytes 


Field Name 


Hex 
Digit 


Description 


Dec Hex 




1 1 


1 

1 


ARDID 
ARDTYPE 


X'AD' 


Control block identifier 
Identifies the type of 
space defined by the 
ARDB: 






ARDKR 


X'80' 


One key range of a key- 
range data set 






ARDHLI 


X'40' 


The total index of a 
key-sequenced data set 
that does not have the 
sequence set with the 
data, or 

The non-sequence set 
levels of a key- 
sequenced data set's 
index, when the 
sequence set is stored 
with the data 






ARDSS 


X'20' 


The sequence set of a 
key-sequenced data 
set, when the sequence 
set is stored with data 






ARDUOVFL 


X'lO' 


Use overflow volumes 
for this key 






ARDEOD 


X'OS' 


End of data ARDB 






ARDLGCC 


X'04' 


Device contains more 
than 256 cylinders 


2 2 


2 


ARDLEN 




Length of the ARDB 


4 4 


1 


ARDPRF 


X'80' 


Address range definition 
preformat byte (this 
byte is a literal copy 
of the catalog byte 
called ITYPEXT) 






ARDPRFMT 


X'40' 


No preformat done 
indication 


5 5 ■ 


3 






Reserved 


8 8 


4 


ARDNPTR 




Address of the next 
ARDB in the ARDB 
chain 


12 C 


4 


ARDHRBA 




The RBA of the next 
free-space control 
interval at the end of 
the data set (RBA of 
VSAMSEOF) 


16 10 


4 


ARDEDBA 




Pointer to the active 
EDB 


20 14 


4 


ARDPREL 




Pointer to related ARDB 


24 IB 


4 


ARDERBA 




The RBA of the highest 
control interval 
allocated to the key 
range 



ADDRESS RANGE DEFINITION BLOCK (ARDB) (....Cont'd) 



Displacement 


Bytes 


Field Name 


Hex 
Digit 


Description 


Dec Hex 


28 IC 


4 


ARDPKEYS 




Pointer to ARDKEYS 


32 20 


4 


ARDHKRBA 




The RBA of the data set 
control interval 
containing the key 
range's high-key value 


36 24 


2 


ARDVOLNM 




Number of volumes in 
list 


The following te 


n-byte entry 


, called an ARDB volume group, repeats for each volume 


in this ARDB. 






38 26 


10 


ARDVOLGP 




Volume serial 
(VOLSER) list 


38 26 


6 


ARDVOLSR 




The serial number of the 
volume containing the 
highest RBA allocated 
to the key range 


44 2C 


2 


ARDRELRP 




Catalog relative 
replication number 


46 2E 


2 


ARDSYMU 




Symbolic unit 


46 2E 


1 


ARDSUCLS 




Symbolic unit class 


47 2F 


1 


ARDSUNUM 




Symbolic unit number 


Variable 


Variable 


ARDKEYS 




Space reserved for the 


(after last 








key range's low and 


volume group) 








high key values. The 
length of this field 
equals twice the key 
length 



BUFFER CONTROL BLOCK (BCB) 



Displacement 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 










4 


BUFNBCB 




Address of the next 
BCB entry 


4 


4 


4 


BUFCBAD 




Buffer address 


8 


8 


20 


BUFRIODR 




Read I/O driver block 


8 


8 


2 


BUFCURRU 
BUFCURU 




Read symbolic unit 

number 

Current logical unit 


10 


A 


2 


BUFBKSTR 




Number of physical 
blocks to read 


12 


C 


8 


BUFRSEEK 




Computed DASD 
address for read 


12 


C 


1 


BUFRM 




M 


13 


D 


2 


BUFRBB 




BB 


15 


F 


2 


BUFRCC 




CC 


17 


11 


2 


BUFRHH 




HH 


19 


13 


1 


BUFRR 




R 


20 


14 


4 


BUFCRRBA 




RBA for the read 


24 


18 


4 


BUFRLPMB 




Address of the read LPMB 


28 


IC 


20 


BUFWiODR 




Write I/O driver block 


28 


IC 


2 


BUFCURWU 




Write symbolic unit number 


30 


IE 


10 


BUFCKIN 




Write check initialize area 


30 


IE 


2 


BUFBKSTW 




Number of physical blocks 
to write 


32 


20 


8 


BUFWSEEK 




Computed DASD address 
for write 


32 


20 


1 


BUFWM 




M 


33 


21 


2 


BUF V^B 




BB 


35 


23 


2 


BUFWCC 




CC 


37 


25 


2 


BUFWHH 




HH 


39 


27 


1 


BUFWR 




R 


40 


28 


4 


BUFCWRBA 




RBA for the write 


44 


2C 


4 


BUFWLPMB 




Address of the write LPMB 


48 


30 


2 


BUFFLAG 




Flag bytes 


48 


30 


1 


BUFFIAGI 




Flag byte 1: 








BUFCMW 


X'BO' 


Write indicator 








BUFCFMT 


X'40' 


Format write indicator 








BUFCRRD 


X'20' 


Read indicator 








BUFRDAHD 


X'lO' 


Read ahead request 








BUFPFMT 


X'08' 


Format remainder of control 
area 








BUFCVAL 


X'04' 


Buffer contents are valid 








BUFSSRCD 


X'02' 


Buffer is a sequence set 
record 








BUFRESl 


x'or 


Available 








BUFFLAG2 




Flag byte 2 : 


49 


31 


1 


BUFALL2 


xVf* 


All Bits in BUFFLAG2 








BUFALLl 


x'ff' 


All Bits in BUFFLAGl 








BUFIOS 


x'es' 


BUFCMW + BUFCFMT + 
BUFCRRD + BUFPFMT 








BUFPURGl 


X'80' 


Purge - must write or read 








BUFPURG2 


X'40' 


Purge - format 








BUFRIXRD 


X'20' 


Replicated index read 



BUFFER CONTROL BLOCK (BCB) (....Cont'd) 



Displacement- 


Bytes 


Field Name 


Hex 
Digit 


Description 


Dec 


Hex 








BUFF REP 


X'08' 


Return buffer by REPBUF 








BUFWRINV 


X'lO- 


Control Interval was 
written - another string 








BUFRES2 


X'07' 


Available 


50 


32 


10 


BUFBKTWI 




Write initialize area 


50 


32 


2 


BUFBKTCK 




Number of physical 
blocks to check 


52 


34 


8 


BUFWCKSK 




Computed DASD 
address for check (not 
used in release 1) 


52 


34 


1 


BUFCM 




M 


53 


35 


2 


BUFCBB 




BB 


55 


37 


2 


BUFCCC 




CC 


57 


39 


2 


BUFCHH 




HH 


59 


3B 


1 


BUFCR 




R 


60 


3C 


4 


BUFVCCHH 




CCHH for index read 


60 


3C 


4 


BUFVCCB 




CCB address 


64 


40 


1 


BUFERFLG 




I/O error indicator 








BUFERALl 


x'fc" 


All Bits in B,yFERFLG 

Minus: BUFEDSK BUFGENTCM 








BUFEIOER 


X'80' 


I/O error on buffer 








BUFESRCH 


X'40' 


I/O error on search ID 








BUFESEEK 


X'20' 


I/O error on seek 








BUFEREAD 


X'lO- 


I/O error on read 








BUFEWRT 


X'08' 


I/O error on write 








BUFERBCK 


X'04' 


1/ O error on readback 
check 








BUFENTCM 


X'02' 


I/O operation complete 








BUFEDSK 


X'or 


2314 seek incorrect 


65 


41 


1 


BUFSTRID 




String ID of this set of 
buffers 


66 


42 


2 


BUFCNOI 




No. of blocks in control 
interval to process 


68 


44 


4 


BUFNABCB 




Next BCB in AMDSB chain 


BCB Extension fo 


r Local Share 


J Resources 






72 


48 


4 


BUFMDBTS 




Modification Mask (One 
Bit per Transaction-See 
BSPH) 


76 


4C 


4 


BUFUCHUP 




Address of previous BCB in 
Chain 


80 


50 


4 


BUFUCHDN 




Address of next BCB in Chain 


84 


54 


4 


BUFBSPH 




Address of BSPH 


88 


58 


2 






RESERVED 


90 


5A 


1 


BUFFLAG3 




RESERVED 


91 


5B 


1 


BUFUSE 




Buffer use Byte (X'FF' = in use) 


92 


5C 


7 


BUFHDSID 




Catalog^s ACB Address//CI No 
of the Catalog Record for this 
Data on Index Component 


99 


63 


1 






RESERVED 


100 


64 


4 


BUFAMDSB 




Pointer to AMDSB 


104 


68 


4 


BUFACB 




Pointer to ACB 



BUFFER HEADER (BHD) 



Displacement. 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 










2 


BHDNO 




Number of buffers 


2 


2 


2 


BHDLEN 




Length of control block 


4 


4 


2 


BHDRAMX 




Maximum number of 
buffers available 


6 


6 


2 


BHDRMIN 




Minimum number of 
buffers available 


8 


8 


2 


BHDBRC 




Read-ahead count 


10 


A 


1 


BHDHFLAG 




Buffer header flag 1 








BHDRAHOK 


X'80' 


Read-ahead OK flag 








BHDIXREP 


X'40' 


Replicated index read 
indicator 








BHDNSKD 


X'08' 


I/O with wait for no- 
schedule queue 
(BCBNSKDQ) 








BHDSKD 


X'04' 


I/O vyith wait for 
schedule queue 
(BCBSKDQ) 








BHDMVBCB 


X'02' 


Free buffer is a move 


11 


B 


1 


BHDFLAG 




Buffer header flag 2 


12 


C 


4 






Reserved 


16 


10 


4 


BHDISTF 




Address of chain of 
free buffers 


20 


14 


4 


BHDSKDQ 




Address of BCB chain 
with I/O scheduled 


24 


18 


4 


BHDNSKDQ 




Address of BCB chain 
with pending I/O 


28 


IC 


4 


BHDISTW 




Address of first BCB 
requiring I/O 


32 


20 


1 


BHDID 


X'77' 


BHD identification 


33 


21 


1 






Reserved 


34 


22 


2 


BHDiOCNT 




I/O count of no-schedule 
queue (BCBNSKDQ) 


36 


24 


2 


BHDWMIN 




Write threshold 


38 


26 


2 


BHDTRACT 




Temporary read -ahead 
count 


40 


28 


2 


BHDQNO 




Number of BCBs on queues 


42 


2A 


2 






Reserved 


44 


2C 


4 


BHDCCHH 




CCHH of last held control 
area 


48 


30 


4 


BHDCCBCH 




CCB chain pointer 



BLOCK POOL HEADER (BKPHD) 



Offset 




Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 










2 


BKPLENG 




Length of the pool of 
blocks 


2 


2 


2 






Available 


4 


4 




BKPHDECB 




Control allocation of 
blocks 


4 


4 


2 






Not used 


6 


6 


1 


BKPHDCOM 




Communications byte 








BKPHWAIT 


X'80' 


Wait flag 


7 


7 


1 


BKPHDTS 




Test and set byte 
allocation 


8 


8 


32 


BKPHRSAV 




Space for saving 
registers -steal 


8 


8 


4 


BKPHRS13 




Save register 13, swap 
PLH 


12 


C 


4 


BKPHRS14 




Save register 14 during 
steal 


16 


10 


4 






Save register \5 during 
steal BCB 


20 


14 


4 


BKPHRSOO 




Save register during 
steal BCB 


24 


18 


4 


BKPHRS01 




Save register 1 


28 


IC 


4 






Save register 2 


32 


20 


4 






Save register 3 


36 


24 


4 






Save register 4 


40 


28 


4 


BKPHDBHD 




Save data buffer header- 
steal 


44 


2C 


4 


BKPHIBHD 




Save index buffer header - 
steal 


48 


30 


4 


BKPSPCHN 




Address of next area of blocks 


52 


34 


4 


BKPERCCB 




Address of CCB chain of errors 
(first error CCB in VSAM 
error queue 


56 


38 


4 


BKPFSTBK 




Address of first avail. blocks 


60 


3C 


4 


BKPSTECB 




ECB-steal BCB, other string 


60 


3C 


2 






Available 


62 


3E 


1 


BKPSTCOM 




Communications byte 








BK PS WAIT 


X'80' 


Wait flag 


63 


3F 


1 


BKPSnS 




Test and set block 



BLDiVRP Parameter List (VRPPL) 



Offset 
Dec Hex [Bytes 



Hex 
Digit 



Description 



VRPBFLST 
VRPKEYLN 



Address of buffer list 

Maximum Ueylength In VSAM 

Resource Pool 

String number of VSAM 

Resource Pool 

Reserved 



VRP Buffer List 
/ing 8 bytes are repeated for each subpool specified. 



I 



C 
10 



VRPBFSZE 
VRPBFIND 
VRPBLEND 



Size of buffers in subpool 

Indicator byte 

End of buffer list 

Reserved 

Number of buffers in subpool 



Buffer Subpool HeadeKBSPH ') 



Offset 








Hex 




Dec 


Hex 


Bytes 


Field Name 


Digit 


Description 




1 




1 


1 
1 


BSPHID 


X'72' 


Control block identifier 
Reserved 


2 


2 


2 


BSPHLEN 




Length of BSPH 


4 


4 


4 


BSPHNM 




Name BSPH 


8 


8 


4 


BSPHNBSP 




Pointer to next BSPH in pool 


12 


C 


2 


BSPHBFNO 




Number of buffers in this 
subpool 


14 


E 


2 






Reserved 


16 


10 


4 


BSPHMDBN 




Number of modified buffers in 
this subpool 


20 


14 


4 


BSPHFRBN 




Number of free buffers in this 
subpool 


24 


18 


4 


BSPHBCB 




Address of first BCB in the 
subpool 


28 


1C 


4 


BSPHMDBT 


32-BIT 


Modification Mask. Each bit 
correspond to a transaction 
which has modified the buffer 


32 


20 


4 


BSPHBSZ 




Length of each buffer in this 
subpool 


36 


24 


4 


BSPHCPLH 




Address of the PLH currently in 
control of the BSPH 


40 


28 


16 






Reserved 


56 


38 


4 


BSPHUTOP 




Pointer to the top of the use 
chain* 


60 


3C 


4 


BSPHUBTM 




Pointer to the bottom of the use 
chain* 


64 


40 


4 


BSPHIST 




Address of the first BSPH in the 
buffer pool 


68 


44 


2 


BSPHECB 




Control bytes for changing use 
chain 


70 


46 


1 


BSPHCOM 




Communications byte 








BSPHWAIT 


X'80' 


Wait flag 


71 


47 


1 


BSPHTS 




Mask byte for test and set 



The use chain is a chain of oil BCBs I 
is at the bottom of the chain and the 



n the subpool . The least recently used BCB 
most recently used BCB is at the top. 



CATALOG AUXILIARY WORK AREA (CAXWA) 





Offset 


Bytes and. 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 








1 




1 


1 . 
3 


CAXID 


Control Block identifier X"CA" 
Reserved 


4 


4 


4 


CAXCHN 


Address of the next CAXWA in the chain 


8 


8 


.V.'. .... 

..1 

...1 .... 

.... .'{.'. 

1. 

.... ...1 


CAXFLGS 

CAXBLD 

CAXOPN 

CAXCLS 

CAXEOV 

CAXCMP 

CAXMCT 

CAXCMR 

CAXSCR 


Flags: 

Build request 

The catalog is being opened 

The catalog is being closed 

An end-of -volume routine is in control 

Open /Close/EOV processing is 

l=Master Catalog 

0=User catalog 

Catalog management has been called by 

a catalog management routine 

Reserved for OS 


9 


9 


.{.'. .... 
..] 

...1 .... 

X. 

.... ...1 


CAXFLG2 
CAXF2DT 
CAXF2NDD 
CAXF2CCR 

CAXF2CRA 
CAXF2REC 
CAXF2EOV 

CAXF2CA 


Flags: 

The catalog has been deleted 

No DLBL file name found 

0=CCR needs to be read 

1=CCR has been read 

CAXWA for CRA 

Recoverable catalog 

End of volume flag 

Reserved 

Free CAXWA if error 


10 


A 






Reserved for OS 


11 


B 




CAXACT 


Catalog activity count 


12 


c 


4 


CAXATIOT 


Reserved for OS 


16 


10 


4 


CAXSCHWA 


Reserved for OS 


20 


14 


4 


CAXDRWP 


Address of the catalog's DRWA 


24 


18 


4 


CAXACB 


Address of the catalog's ACB 


24 


18 


4 


CAXCRACB 


Address of CRA (ACB) 


28 


1C 


4 


CAXUCB 


Address of the COMREG 


32 


20 


12 


CAXCCR 


Catalog control record information 


32 


20 


3 


CAXHACI 


Catalog interval number of the highest 
allocated control interval in the catalog 


35 


23 


3 


CAXNFCI 


Control interval number of the next 
free control interval in the catalog 


38 


26 


3 


CAXCDCI 


Number of deleted control intervals 


41 


29 


3 


CAXFDCl 


Control interval number of the first 
deleted control interval in the catalog 


44 


2C 


2 




Reserved 


46 


2E 


2 


CAXRPLCT 


Number of RPb associated with the 
CAXWA 


48 


30 


4 


CAXRPL 


Address of the first RPL in the CAXWA 's 
RPL chain 


52 


34 


44 


CAXCNAM 


Catalog name 


96 


60 


4 


CAXOPLST 


Open/Close paromater list : 


96 


60 


1 

1... .... 

.XXX xxxx 


COPTS 
CENLST 


Option flags: 
End-of-list indicator 
Reserved 


97 


61 


3 


COPACB 


Address of the catalog's ACB 



CATALOG AUXILIARY WORK AREA (CAXWA) (. . .Continued) 



Offse 


t 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 






100 


64 


4 


CAXOPEWA 


Reserved for OS 


104 


68 


4 


CAXCCA 


Address of the CCA 


108 


6C 


4 


CAXJDE 


Reserved for OS 


112 


70 


4 


CAXCAT 


Address of the catalog's ACB 
associated with CRA 


115 


74 


6 


CAXVOLCR 


Volume serial of CRA volume 


112 


7A 


2 


CAXSYSCR 


SYS-number of CRA volume 


124 


7C 


6 


CAXVOLRM 


Volume Serial of REM volume 


130 


82 


2 


CAXSYSRM 


SYS-number of REM volume 


132 


84 


6 


CAXOCPAR 


O/C parameter list 


132 


84 


4 


CAXOCACB 


ACB address 


136 


88 


2 


CAXOCEOL 


End of list indicator {X'0A02') 



CATALOG COMMUNICATIONS AREA (CCA) 



Displacement 


Bytes and 
Bit Pattern 


Field Name 


Description 


Dec Hex 





2 


CCAID 


Identifier - set to X'ACCA' 


2 2 


2 


CCASZ 


Size 


4 4 


1 


CCACDl 


Return code 1 


5 5 


1 


CCACD2 


Return code 2 


6 6 


1 


CCAFLGl 


Flag byte 1: 




1 


CCAF1LPS 


Stop the loop 




.1 


CCAFIARA 


Assign RPL to ARA 




..1 


CCAFILRD 


Catalog control record read into 
virtual storage 




...1.... 


CCAFIKEY 


Retrieve the catalog record based 
on a DSNAME value 




.... 0... 




Retrieve by CI number 




.... 1... 


CCAFIKGE 


Retrieve the next catalog record 




1.. 


CCAFICR 


A checkpoint of the CCR is required 




1. 


CCAF1UP 


GET macro instruction issued for 
update 






CCAFIDK 


When the caller is renaming a data 
set, this flag indicates that the data 
set's true-name record is to be 
deleted, but the data set's catalog 
record is not to be deleted. 


7 7 


1 


CCAFLG2 


Flag byte 2: 




1 


CCAF2SYS 


Reserved for OS 




.1 


CCAF2NVC 


No validity check on the caller's 
CTGFL or work area is required 




.. 1 


CCAF2CCT 


Single catalog search 




...1.... 


CCAF2XEQ 


Exclusive enqueue 




...0.... 




Shared enqueue 




.... 1... 


CCAF2RHS 


When a catalog management routine 
calls the VSAM Open routines to open 
a newly created catalog, and the Open 
routines call VSAM Catalog 
Management routines to obtain 
information about the catalog to be 
opened, the situation is called a 
"recursive call". The catalog cannot 
be dequeued when the Catalog 
Management routines return to the 
caller (VSAM Open routines). 




XX. 


CCAF2COB 


Combination of catalog open and build: 




],. 


CCAF2CO 


Catalog h being opened 




1. 


CCAF2CB 


Reserved for OS 




1 


CCAF2SMO 


Search master catalog only 


8 8 


1 


CCAFLG3 


Flog byte 3: 




1 


CCAEXGRl 


Exit indicator 




.1 


CCAGC4 


The catalog record contains a password 
group occurrence (identified by Group 
Code 4) (detected during IGGPSCNC 
processing) 




..1 


CCAGDSP 


GENDSP 




...] .... 


CCAEXGR2 


Exit indicator 



CATALOG COMMUNICATIONS AREA (CCA) (. . . .Con^d) 



Displacement 


Bytes and 
Bit Pattern 


Field Name 


Description 


Dec Hex 




.... 1... 


CCANF 


The group occurrence cannot be found 




1.. 


CCAELC2 


Exit indicator 




1. 


CCALFT 


First time 




1 


CCAEGREC 


Exit indicator 


9 9 


1 


CCAFLG4 


Flag byte 4: 




1 


CCAF4DRQ 


The catalog must be dequeued after 
the request completes 




.1 


CCAF4BYS 


Bypass the security verification 




..1 


CCAGVNC 


The required variable-length field is 
not completely contained in the record 
currently in the buffer 




...1 .... 


CCAGVNF 


The group occurrence identified by the 
caller-specified sequence number 
cannot be found 




.... 1... 


CCAGVNBS 


There is no buffer space availci}le to 
contain an extension record 




1.. 


CCAGVEX 


Exit indicator 




1. 


CCAGVNE 


The field does not exist in the located 
group occurrence 




1 


CCATCOMP 


Test complete : all group occurrence 
pointers hove been examined and all 
designated fields have been tested 


10 A 


1 


CCAFLG5 


Flag byte 5: 




1 


CCAMEX2 


Exit indicator 




.1 


CCAMEX 


Exit indicator 




..1 


CCAMEX1 


Exit indicator 




...1 .... 


CCAMODPA 


The catalog record's base record must 
be written (using IGGPPAD) into the 
catalog 




.... 1... 


CCATHIT 


Successful test : a group occurrence 
has be found that satisfies the test 
conditions 




1.. 


CCATEX 


Exit indicator 




1. 


CCATEX1 


Exit indicator 




1 


CCATEX2 


Exit indicator 


11 B 


1 


CCAFLG6 


F lag byte 6: 




1 


CCAMCODR 


The catalog must be dequeued when the 
request completes 




.1 


CCADELP 


A deleted group occurrence pointer 
was found 




..1 


CCAMNOSP 


The catalog record's free space isn't 
large enough to contain all the new 
catalog information during the group 
occurrence move operation 




...1 .... 


CCAINIT 


Insert switch for variable-length 
field being retrieved 




.... 1... 


CCASUPFD 


Suppress password field information 
during field retrieval 




1.. 


CCAREUSE 


The contents of the caller's record 
areas (buffers) can be used by 
IGGPEXT and IGGPMOD 



I 



CATALOG COMMUNICATIONS AREA (CCA) (....Cont'd) 



Displacement 


Bytes and 
Bit Pattern 


Field Name 


Description 


Dec 


Hex 






1. 


CCAEXT 


Set when a catalog management 
routine calls the Extract routine 
(IGGPEXT) 






1 


CCAMOD 


Set when a catalog management 
routine calls the Modify routine 
(IGGPMOD) 


12 


C 




CCALBLEN 


Count field in units of 128 bytes 


13 


D 




CCALBCYL 


Address field 


16 


10 




CCADPL 


Address of the DADSM parameter list 


20 


14 




CCACPL 


Address of the caller's CTGPL 


24 


18 




CCAACB 


Address of the catalog's ACB 


28 


1C 




CCANPCCB 


Address of next PCCB 


32 


20 




CCAURAB 


Address of the record area block 
(RAB) currently in use 


36 


24 


44 


CCASRCH 


Search argument (DSNAME of a 
cluster, data, index, catalog, or non 
VSAM data set, or a volume serial 
number) 


36 


24 


3 


CCASRID 


Control interval number 


36 


24 


3 


CCASRCIN 


Control interval number 


80 


50 


20 


CCARABO 


Record Area Block : Each record 
area block describes the catalog 
record contained in one of the six 
catalog management buffers available 
for the request. RABs 1 through 5 are 
identical in format to RAB 0. 
Note : "x" in each field name is 
replaced by "0" through "5" to 
indicate a particular RAB's field. 


80 


50 


1 

1 

.1 

-.1 

...1 .... 

.... 1... 
.... ...1 


CCARxFLG 

CCARxUR 
CCARxUl 

CCARxU2 
CCARxWR 

CCARxPA 
CCARxUPD 


Flags: 

The following flag is used by IGGPEXT 

and IGGPMOD: 

The RAB is in use. It cannot be used by 

IGGPEXT or IGGPMOD 

The RAB is temporarily in use by 

IGGPEXT or IGGPMOD. It cannot be 

overlaid 

(Same as CCARxUl) 

The buffer must be written before 

another catalog record can be read 

into it 

The buffer contains a new catalog 

record - PUT-add is required to add 

the record to the catalog 

Reserved 

Update buffer not reused 


81 


51 


1 


CCARxRPL 


Lost assign, RPL index 


82 


52 


2 




Reserved 


84 


54 


4 


CCACPEIX 


Address of the record in the buffer 


88 


58 


12 


CCARxSEG 


Addresses of segments 



CATALOG COMMUNICATIONS AREA (CCA) (. . . Cont'd) 



Displacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 






88 


58 


4 


CCACPE2X 


Address of the first byte after the 
fixed-length header fields 


92 


5C 


4 


CCACPE3X 


Address of the first group occurrence 


96 


60 


4 


CCACPE4X 


Address of the first free-space byte 
in the record 


100 


64 


20 


CCARABl 


Record Area Block 1 (See RAB 
description) 


120 


78 


20 


CCARAB2 


Record Area Block 2 (See RAB 
description) 


140 


8C 


20 


CCARAB3 


Record Area Block 3 (See RAB 
description) 


160 


AO 


20 


CCARAB4 


Record Area Block 4 (See RAB 
description) 


180 


B4 


20 


CCARAB5 


Record Area Block 5 (See RAB 
description) 


200 


C8 




CCARPLK 


Assigned RPL count 


201 


C9 




CCARPLF 


index to RPL found 


202 


CA 




CCARPLX 


Work byte for ARPL, RPLM 


202 


CA 




LPINDX 


Loop indexing control (counter) 


202 


CA 




CCARPLX 


Work byte for catalog RPL 
(mult. -use) 


202 


CA 


.1 

..1 

...1 .... 

.... 1... 

1.. 

1. 

1 

1 


XIOOPT 

XIOGET 
XIOERS 
XIOARA 

XIOKEY 

XIONUP 
XIONCK 
XIOTNE 

XIOKGE 
XIOSEQ 


I/O options 

1=GET, 0=PUT 

ERASE 

l=auxiliary record area required 

0=user record area required 

l=keyed required 

0=address required 

No update required 

No error check required 

1=true name entry 

0=normal entry 

GET NEXT (GET) 

PUT SEQ (PUT) 


203 


CB 




CCARPLT 


Work byte for ARPL, RPLM 


204 


CC 




CCARPLAA 


Indices to assigned RPLs 


210 


D2 






Reserved 


212 


D4 




CCARPLl 


Address of the RPL in use 


216 


D8 


132 


CCADESA 


Save area for the extent information 
returned by VSAM DADSM and 
Catalog Management : Subailocate 


216 


D8 




CCANDEXT 


Number of extents 


217 


D9 




CCAIXEXT 


Extent index value 


218 


DA 




CCASSVOL 


Sequence number of the data set 
directory entry in the volume catalog 
record 


220 


DC 


128 


CCAEXTDE 


Sixteen 8-byte extent descriptors : 


220 


DC 




CCAEXTSS 


Sequence number of the Data Space 
group occurrence that this extent's 
space is a part of 



I 



CATALOG COMMUNICATIONS AREA (CCA) (. . .Cont'd) 



Displacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 






222 


DE 


4 


CCAEXTAD 


The extent's starting physical address : 


222 


DE 


2 


CCAEXTCC 


Cylinder number CC 


224 


EO 


2 


CCAEXTHH 


Head number HH 


226 


E2 


2 


CCAEXTTH 


Number of tracks in the extent 


228 


E4 


120 




Spale for remaining 15 extent 
descriptors 


348 


15C 


1 


CCAASCIK 


Number of control intervals required 
to satisfy the caller's request 


349 


15D 


1 


CCACRRP 


RPL used for reading CCR 


350 


15E 


1 


CCAASCIX 


Used by the ASSIGN functions - points 
to the element in CCAASCi currently 
being processed 


351 


15F 


1 


CCASRPLX 


Saved RPL flags 


352 


160 


9 


CCA ASCI 


Number of each assigned control 
interval 


361 


169 


3 


CCAUPGD 


Control interval for UPG modification 


364 


16C 


16 


CCAEQDQ 


Enqueue/Dequeue parameter list 


364 


16C 


1 


CCAEDXFF 


End of parameter list, indicator byte 
=X'FF' (if list is empty) 


365 


16D 


1 


CCAEDRLN 


Length of minor name 


366 


16E 


1 

1 

,1 

. . XX xxxx 


CCAEDOPT 
CCAEDSHR 
CCARLSEB 


Enqueue/Dequeue Options 
l=Shared, 0-Exlusive 
Release control bit 
Other options (set by macro) 


367 


16F 


1 


CCAEDRCD 


Enqueue/Dequeue return code 


368 


170 


4 


CCARTSAV 


Save area for CCAMLRET 


372 


174 


4 


CCACOMRG 


COMRG pointer 


376 


178 


4 


CCAEDUCB 


Work area 


380 


17C 


4 


CCAMLRET 


Address of the caller's save area 
used by IGGOCLAG 


384 


180 


12 


CCAMSSPL 


GETVIS/FREEVIS parameter list area 


384 


180 


4 


CCAMNLEN 


Number of bytes to process 


388 


184 


4 


CCAMNPTR 


Address of the return address 


392 


188 


1 




Reserved for OS 


393 


189 


1 


CCAMNSPL 


Reserved for OS 


394 


18A 


2 




Reserved for OS 


396 


18C 


4 


CCARPRM 


Return parameters 


400 


190 


8 


CCACMS 


Catalog Management Services work area 


400 


190 


4 


CCACMSWA 


Address of the CMS calling routine's 
work area 


404 


194 


4 


CCAEXCMS 


Address of a secondary CMS work area 


The following f 


ields are set 


and used by IGG 


PLOC, IGGPEXT, and IGGPTSTS, 


and catalog ma 


nagement su 


jfunctions which 


hese procedure call : 


408 


198 





CCALUME 




408 


198 


4 


CCACPES 


Address of a selected group occurrence 


412 


19C 


4 


CCACPE51 


(Same as CCACPE5) 


416 


lAO 


4 


CCACPE52 


(Same as CCACPES) 


420 


1A4 


4 


CCACPE53 


(Same as CCACPE5) 


424 


1A8 


4 


CCACPE6 


Address of a selected group occurrence 


428 


lAC 


4 


CCACPE61 
CCARABSE 


(Same as CCAPE6) 

Save extract caller URAB 


432 


IBO 


4 


CCACPE7 
CCA 1 DPT 


Address of field value 
insert data address 


436 


1B4 


4 


CCACPE71 


Alternate address to field value 



CATALOG COMMUNICATIONS AREA (CCA) (...Cont'd) 



Displacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 






440 


188 


2 


CCAGOPLN 


Length of the group occurrence pointer 


442 


ISA 


2 


CCASL 


Length of sequence number field 
(RELREPNO) in the group occurrence 


444 


IBC 


4 


CCAILNG 


Length of the selected retrieved field 


448 


ICO 


4 


CCAFLPT 
CCATFLPT 


Address of the requested-field CTGFL 
Address of the CTGFL-for-tests 


452 


1C4 


4 


CCARABPT 


Address of the record area block 


456 


1C8 


4 


CCADICT 


Dictionary information to describe the 
field, based on its field name 


460 


ICC 


4 


CCAXCPL 
CCAMCPL 


Address of the CTGPL built when 
IGGPEXT and IGGPMOD are called, so 
that information in the caller's CTGPL 
is not altered 


464 


IDO 


4 


CCARABB 


Address of the RAB that identifies the 
base catalog record 


468 


1D4 


4 


CCARABF 


Address of the RAB that identifies, the 
first record area (buffer) that can be used 
by IGGPEXT or IGG^'MOD 


472 


1D8 


4 


CCARABL 


Address of the RAB that identifies the 
last record area (buffer) that can be used 
by IGGPEXT or IGGPMOD 


476 


IDC 


3 


CCACBASE 


The control interval number of the base 
catalog record 


479 


IDF 


1 


CCAGC 


Group code of the requested group 
occurrence 


480 


lEO 


2 


CCALREL 
CCALRELl 


Relative repetition number of a selecte 
group occurrence 


482 


1E2 


2 


CCASN 
CCASNl 


Sequence number of a selected group 
occurrence 


484 


1E4 


.']'.'. .... 
.,1 

.... 1... 
1.. 

1. 

1 


CCAFLG8 

CCARPUT 

CCALSTC 

CCAEXTCR 

CCABLDCR 

CCASPUCO 

CCASCAX 

CCAUPG 
CCABUF 


CRA flags 

Inhibit CRA PUT 

List cat request 

Extend CRA in process 

Open request for CRA build 

Special UCAT 

1=CRA CAXW A search; 

0= UCAT CAXWA search 

l=upgrade ; 0=no upgrade 

Output buffering flag 


485 


1E5 


.1 

..1 

.... 1... 
1.. 


CCAFLGA 
CCAUPGRR 
CCARGET 

CCALBFVT 
CCACCARD 
CCAF1LSV 
CCACANIN 


More flags 

RAB1 to be restored by upgrade module 

Get record for compare before update 

CRA 

l=Multiple file parameter search at define 

Indicate CCR for CRA has been reached 

Save indicator flag CCAFILRD 

Cancel inhibit 

Reserved 


486 


1E6 


2 


CCAIXFPL 


Index to the current CTGFL being 
processed 


488 


1E8 


2 


CCAIXREL 


Index for CCATREL 


490 


lEA 


2 


CCATNREL 


The sequence number of the next group 
occurrence to perform tests against if 
CCATREL is full or if there are no buffers 
available to contain the catalog record's 
next extension 



I 



CATALOG COMMUNICATIONS AREA (CCA) (. . .Cont'd) 



Displacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 






492 


lEC 


2 


CCATNUM 


Number of successful relative repetition 
numbers (cannot exceed 16) 


494 


lEE 


32 


CGATREL 


Successful relative repetition numbers 


526 


20E 


2 


CCATNO 


Total number of successful relative 
repetition numbers (might exceed 16) 


528 


210 


4 


CCATEST 


Address of the test CTGFL 


532 


214 


20 


CCARBA 


Work area for extent descriptors 


532 


214 


2 


CCASS 


Sequence number of the Data Space 
group occurrence that contains the extent 


534 


216 


4 


CCACCHHl 


Physical address -CCHH - of the extent's 
first track 


538 


21A 


4 


CCACCHH2 


Physical address -CCHH - of the extent's 
last track 


542 


21E 


2 


CCATT 


Number of tracks in the extent 


544 


220 


4 


CCARBA 1 


Low relative byte address (RBA) 


548 


224 


4 


CCARBA2 


High relative byte address (RBA) 


552 


228 


2 


CCATLNG 
CCATLEN 


Total length of the extent information 
that has been processed (CCATLNG) ; 
total length of the scanned field so far 
(CCATLEN) 


554 


22A 


2 


CCARBAL 


RBA extent balance 


556 


22C 


2 


CCACNIX 


Combination name index 


558 


22E 


2 


CCAREASN 


Reason code 


560 


230 


4 


CCAIDPT2 


Address of the available space in the 
caller's work area or of the caller- 
supplied update information 


564 


234 


4 


CCAIDPT3 
CCARABSM 


Address of the length-field of a 
variable length field in the user's 
return area 


568 


238 


2 


CCAGVa 


Number of group occurrence pointers 
processed so far 


570 


23A 


2 


CCANEVV 


If the requested variable-length field is 
non-extent, this field is set to binary zero 


572 


23C 


3 


CCAGVEXT 


Control interval number of the record's 
next extension record (not yet in a buffer) 


575 


23F 


1 


CCANEFV 


If the requested fixed-length field is 
non-extent, this byte is set to X"FF". 


576 


240 


1 




Reserved 


577 


241 


1 


CCAGRGC 


Group code of the requested group 
occurrence 


578 


242 


2 


CCAGRHI 
CCAGRH 1 1 


High relative repetition number 


580 


244 


2 


CCAIXTPL 


Index to Jest FPL 


582 


246 


2 


CCADLEN 


Number of bytes to be deleted from the 
catalog record 


584 


248 


2 


CCADIFF 


The difference between the insert length 
and the delete length (con be a negative 
number) 


586 


24A 


2 


CCAREPCT 


Number of relative repetition numbers 
processed so far 


588 


24C 


2 


CCADISP 


Displacement into variable-length field to 
the delete/ insert location 


590 


24E 


3 


CCASVCI 


Save area for the control interval number 
of the base catalog. record 


593 


251 


3 


CCASVCIl 


Save area for the control interval number 



III -36 



CATALOG COMMUNICATIONS AREA (CCA) (...Cont'd) 



Displacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 






596 


254 


4 


CCADTA 


Address of the dictionary 


600 


258 


4 


CCACDTA 


Address of the index combination table 


604 


25C 


2 


CCADTCT 


Number of dictionary entries 


606 


25E 


2 


CCACDTa 


Number of index combination entries 


608 


260 


4 


CCACWAP 


Controller work area 


612 


264 


4 


CCAMNADR 


Address of the virtual storage obtained by 
a GETVIS request 


616 


268 


4 


CCAILNG3 


Save area for the insertion length 


620 


26C 


4 


CCAILNG2 


Length of the user-supplied insert data 


624 


270 


4 


CCAALPTR 


Address of the space management work 


628 


274 


4 




Reserved 


632 


278 


4 


CCALCPL 


Reserved for OS 


636 


27C 


.1 

..1 

...1 .... 
.... 1... 

1.. 

1. 

1 


CCAFLG7 

CCALSP 

CCANRLSE 

CCACKDEL 

CCASMFBR 

CCAONCE 

CCAROREO 

CCAFEOV 

CCAEQOPN 


Flags: 

Reserved for OS 

Release Control Bit 

Delete switch 

Do GET for base record 

Move only one occurrence 

Read only request 

Force EOV 

Enqueued on SYSOPEN 


637 


27D 


3 


CCARCI 


CRA Record control interval number 


640 


280 


4 


CCALABSV 


Saved address of IKOLAB area 


644 


284 


4 


CCARABSV 


Saved address of RAB 


648 


288 


2 


CCAMODUL 


Module name 


650 


28A 


3 


CCACHAIN 


Control interval number save area 


653 


28D 


3 


CCACIl 


Control interval number save are 


656 


290 


3 


CCACI2 


(Same OS CCACIl) 


659 


293 


3 


CCACI3 


(Some as CCACIl) 


662 


296 


2 


CCAVARLN 


Number of bytes to be inserted into 
the record 


664 


298 


4 


CCARRAB 


Address of the RAB containing the 
group occurrence pointers where 
delete/insert processing is to begin 


668 


29C 


4 


CCARBASE 


(Same as CCARRAB) 


672 


2A0 


4 


CCAVARPT 


Address of the information to be 
inserted into the record 


676 


2A4 


2 


CCADELN 


Number of bytes to be deleted from 
the record 


678 


2A6 


20 


CCAVAR 


Insert information save area 


698 


2BA 


20 


CCAVARl 


(Same as CCAVAR) 


718 


2CE 


3 


CCADELl 


The control interval number of the first 
record in a series of records to be 
deleted 


721 


2D1 


3 


CCADEL2 


The control interval number of the lost 
record in a series of records to be 
deleted 


724 


2D4 


40 


CCAXLATE 


Translation work area 


764 


2FC 


4 


CCAR14S 
CCABMINP 


Register 14 save area 

input parameters to IGGOCLBR 


768 


300 


2 


CCABMTRK 


Starting track 


770 


302 


2 


CCABMLIM 


Check limit, nn for set 


772 


304 


2 


CCABMMIN 


Conditional check minimum 


774 


306 


1 


CCABMFLG 


State and function code 



CATALOG COMMUN ICATIONS AREA (CCA) ( . . . Cont'd) 



Displacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 










1 


CCABMST 


This bit can be or 1 and is the state 
for which an extent is to be checked 
(if bit 1 is on) or the state to which 
a map bit is to be set (if bit 2 is on). 






,1 


CCABMCHK 


ON -Perform check 






..1 


CCABMSET 


ON-Perform set 






...1 .... 


CCABMCCK 


ON-Perform condition check 






1... 


CCABMLST 


ON -Last set request (write) 






XXX 




Reserved 


775 


307 


1 




Reserved 


776 


308 





CCABMOUT 


Output parameters from IGGOCLBR 


776 


308 


2 


CCABMONN 


Track number 


778 


30A 


2 


CCABMOTR 


Starting track 


780 


30C 


1 

1 


CCABMOFG 
CCABMOST 


Output flags 
State of bits 
Reserved 


781 


30D 


6 


CCAVOLCR 


CRA volume identification 


787 


313 


1 


CCABMPAD 


Padding character 


788 


314 


4 


CCABMGOP 


Current bit mask GOP 


792 


318 


4 


CCABMPTR 


Address of current bit mask byte 


796 


31C 


4 


CCABMEND 


End of current bit mask 


800 


320 


2 


CCABMBTl 


Bit count, first byte 


802 


322 


2 


CCABMBTL 


Bit count, lost byte 


804 


324 


2 


CCABMBYT 


Number of full bytes 


806 


326 


2 


CCABA^TR 


Current bit mask, start track 


808 


328 


4 


CCABMWKl 


Work field 


812 


32C 


4 


CCABMWK2 


Work field 


816 


330 


4 


CCABMWK3 


Work field 


820 


334 


4 


CCABMWK4 


Work field 


824 


338 


4 


CCABMRBl 


Address of first bit map RAB 


828 


33C 


4 


CCABMRB2 


Address of second RAB 


832 


340 


4 


CCACARWA 


Address of CRA definition work area 


836 


344 


4 


CCACRABF 


Address of CRA buffer 


840 


348 


4 


CCASACB 


Address of saved CCA, ACB field 


844 


34C 


4 


CCAEXC 


Save address for CCA ACB 


848 


350 


4 


CCASRPL 


Address of saved CCA, RPL field 


852 


354 


4 


CCAADBUF 


Address of cluster record buffer, cluster 
record saved until CRA volume known 


856 


358 


4 


CCASCAXS 


Address of search argument for CAXWA 
chain search 


860 


35C 


4 


CCASCAXA 


Address of found CAXWA 


864 


360 


4 


CCADEVT 


CRA volume device type 


868 


364 


8 


CCANMFl 


Name field of variable open resource 


876 


36C 


8 


CCANMF2 


Name field of variable open resource 


884 


374 


8 


CCANMF3 


Name field of variable open resource 


The following tv 


vo fields are 


used by the no-u 


jgrade/upgrode function, called by 


ALTER, 


DEFINE 


or DELETE 






892 


37C 




CCAXDCI 


AIX data control interval number 


895 


37F 




CCAXIC! 


AIX index control interval number 


898 


382 




CCACATIN 


CLAH indicator 


899 


383 






Reserved 


900 


384 




CCACQPTR 


CLCO work area 


904 


388 




CCADEVA 


Address of device character return area 


908 


38C 




CCAFARE 


Address of file identification 



CATALOG COMMUNICATIONS AREA (CCA) (...Cont'd) 



Offset 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 






912 


390 


4 


CCAAREA 


Pointer to address of label record area 


916 


394 


2 


CCAMDSAV 


Save area for CCA module 


918 


396 


2 


CCARSSAV 


Save area for CCA 


920 


398 


40 


CCATEMPS 


Temporary area for PLS 


960 


3C0 


348 


CCAREGS 


Save area for registers 


960 


3C0 


4 




Address of user save area 


964 


3C4 


8 


CCAMODNM 


Load module name 


1308 


51C 





CCAEND 


End CCA 



CONTROL INTERVAL WORK AREA (CIW) 



Offset 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 






Register Save Area for IKQCIS ] 








48 


CIWAVE 


Register save area (12 Reg.) 










C1WAVR14 


Register 14 


4 


4 




CIWAVR15 


Register 15 


8 


8 




CIWAVRO 


Register 


12 


c 




CIWAVRl 


Register 1, RDF shift count on entry 


16 


10 




CIWAVR2 


Register 2, RDF modification offset 


20 


14 




CIWAVR3 


Register 3, RDF data work area 


24 


18 


24 




Reserved 


48 


30 


4 


CIWLNGTH 


Length of work area 


Space Manager Save Area 


52 


34 


4 


CIWSPA14 


Register 14 


56 


38 


4 


CIWSPA15 


Register 15 


60 


3C 


4 


CIWSPA03 


Register 3 


IKQPFO Work Area | 


64 


40 




CIWPF014 


Register 14 


68 


44 




CIWPFOOO 


Register 


72 


48 




CIWPFO01 


Register 1 


76 


4C 




CIWPFO02 


Register 2 


80 


50 




CIWPFO03 


Register 3 


84 


54 




CIWPFO04 


Register 4 


88 


58 




CIWACB 


ACB pointer for TCLOSE call 


92 


5C 


2 


CIWSVC 


SVC2 in TCLOSE call list 


94 


5E 


2 




UNUSED 






IKQRRP Work Area 




The work 


area fo 


IKQRRP overlays the work or 


ea for IKQPFO 


64 


40 


4 


CIWRRP14 


Register 14 


68 


44 


4 


CIWRRPOO 


Register 


72 


48 


4 


CIWRRP01 


Register 1 


76 


4C 


4 


CIWRRP02 


Register 2 


80 


50 


4 


CIWRRP03 


Register 3 


84 


54 


4 


CIWRRBA 


Beginning of RBA in extent 


88 


58 


4 


CIWRRPLN 


Preformat length 


92 


5C 


2 


CIWRSEOF 


SEOF indicator 


94 


5E 


2 




UNUSED 


IKQNCA Work Area | 


96 


60 


4 


CIWNEW14 


Register 14 


100 


64 


4 


CIWNEW01 


Register 1 


104 


68 


4 


CIWNEW03 


Register 3 



CONTROL INTERVAL WORK AREA (CIW) (. 


..Continued) 














Offset 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 






108 


6C 


4 


CIWCARBA 


Low RBA of data control area 
(new control area) 


112 


70 


4 


CIWCIRBA 


Index RBA of old sequence set record 


116 


74 


4 


CIWNXRBA 


Index RBA of new sequence set record 


120 


78 


4 


CIWDARDBB 


Address of data ARDB 


IKQCAS Work Area 


124 


7C 


4 


CIWCAS14 


Register 14 


128 


80 


4 


CIWCAS03 


Register 3 


132 


84 


4 


CIWHINEW 


High section of new control area 


136 


88 


4 


CIWSPTR 


Pointer save section 


140 


8C 


4 


CIWHIOLD 


High section of old control area 


144 


90 


4 


CIWEPTR 


Entry pointer 


148 


94 


4 


CIWAKEY 


Address of key jave area 


152 


98 


2 


CIWEINC 


Entry increment bytes 


154 


9A 


2 


CiWSRR 


Offset of last section from the high 
section of the new control area 


156 


9C 


' 


CIWXBUFA 


Address of new index buffer 


Offset 


Bytes 


Field Nome 


Hex 


Description 


Dec 


He. 






Digit 








IKQCIR W 


xk Area 








Control Interval Space Reclamation Work Area 


The work 


area fo 


r IKQCIR ov 


jrlays the work areas for IKQNCA and IKQCAS 


96 


60 


4 


CIWCIR14 




Register 14 


100 


64 


4 


CIWCIR09 




Register 9 


104 


68 


4 


CIWCIR03 




Register 3 


108 


6C 


4 


CIWSAVP 




Free data of pointer save 
for control interval 


112 


70 


1 


CIWCIRSW 




Switch byte 








CIWNEXT 


X'80' 


Position to next entry index 








CIWSPAN 


X'40' 


Spanned entry index 








CIWRECL 


X'20' 


Space reclamation index 








CIWNOSPL 


X'lO' 


No control area split 
indicator 


113 


71 




CIWXWRT 


X'08' 


Write index indicator 


116 


74 


3 






Reserved 


113 


71 


12 


CIWLASMD 




IKQLASMD parameter list 


116 


74 


1 


CIWLID 




Request type 








CIWLTST 


X'04' 


Test request 


117 


75 


7 


CIWLDSID 




Data set identification 


117 


75 


3 


CIWLDSCI 




Control interval number 


120 


78 


4 


CIWLACB 




Pointer to catalog ACB 


124 


7C 


1 


CIWLSOPT 




Share option 


125 


7D 


1 


CIWLFLG 




Flag byte 








CIWLIN 


X'80' 


Input indicator 


126 


7E 


2 


CIWLOUT 




Output count 


128 


80 


8 


CIWRES 




Resource name field 


136 


88 


24 






UNUSED 



I 



CONTROL INTERVAL WORK AREA (CIW) (. . .ConMnued) 



Offset 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Drgit 




IKQCIS Work Area 


160 


AO 


32 


CIWCIWA 




Copy of PLH work area 


192 


CO 


4 


CIWRCDa 




Record count save for move 


196 


C4 


4 


CIWMODPT 




Pointer to modification point 


200 


C8 


4 


CIWFPTR 




Next address 


204 


CC 


4 


CIWFRDF 




Next RDF 


208 


DO 


4 


CIWTCIL 




Total data length of control 
interval 


212 


D4 


4 


CIWCLNUP 




RBA of control interval 
requires an update 


216 


D8 


4 


CIWDCRDB 




Save of current ARDB 
pointer 


220 


DC 


4 


CIWNIRBA 




RBA of new sequence set 


225 


EO 


2 


CIWOLDa 




Save of RDF count 


226 


E2 


1 


CIWFLAGS 




Flags 








CIWNTWO 


X'80' 


Two control intervals are 
needed for this split 








CIWNCAS 


X'40' 


Control area split needed 
to continue 








CIWCASDN 


X'20' 


Control area split has been 
executed 








CIWUHKR 


X'lO- 


ARDHKRBA requires update 








CIWCLN 


X'08' 


Control intervals written 
require clearing 








CIWCIR 


X'04' 


Space reclamation executed 


227 


E3 


1 






UNUSED 




IKQIXE En 


try Stack 






228 


E4 


4 


CIWENTRY 




Index entry data stack 


228 


E4 


12 


CIWENTl 






228 


E4 


4 


CIWRBAl 




RBA to be put in entry 


232 


E8 


4 


CIWKADDl 




Address of key 


236 


EC 


2 


CIWKLl 




Length of key 


238 


EE 


1 


CIWFLGl 




Flag byte 








CIWENTOK 


x'sr 


These two bits are used as 
indicator 








CIWINC 


X'40' 


Index record in core 








CIWSPLIT 


X'20' 


Split entry to be done 








CIWNOIO 


X'lO' 


No execution of input/ 
output yet (I/O is required) 


239 


EF 




CIWIXLVl 




Index level 


240 


FO 


12 


CIWENT2 




Second stack position 


240 


FO 




CIWRBA2 




RBA 


244 


F4 




CiWKADD2 




Key pointer 


248 


F8 




CIWKL2 




Key length 


250 


FA 




CIWFLG2 






251 


FB 




CIWIXLV2 




Index level 


252 


FC 





CIWSTKND 




End of stack 


252 


FC 


4 


CIWEKEYA 




Address of index enter key 



CONTROL INTERVAL WORK AREA (CIW) (. . .ConHnued) 



Offset 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 




Scratch Buffer Parameter List 


256 


100 


20 


CIWDCNV 




Scratch CI descriptor 


256 


100 


4 


CIWDRBA 




Scratch control interval 
RBA 


260 


104 


8 


CIWDBUF 




Buffer parameter list 


260 


104 


4 


CIWDBCB 




Address of control block 


264 


108 


4 


CiWDBAD 




Address of buffers 


268 


IOC 


4 


CIWDCIDF 




CIDF descriptor 


268 


IOC 


2 


CIWDFSO 




Free space offset 


270 


lOE 


2 


CIWDFSL 




Free space length 


272 


110 


1 


CIWDSW 




Switch byte 


273 


111 


1 






Reserved 


274 


112 


2 


CiWDCSZ 




Length of buffer - 10 


IKQIXE Work Area 


276 


114 


4 


CIWIXEBA 




Caller base save 


280 


118 


4 


CIWIXERT 




Return register save 


284 


lie 


4 


CIWIXERO 




Save GETVIS length 


288 


120 


4 


CiWIXERl 




Save GETVIS address 


Work Area for Linkage from IKQCIS to IKQCAS | 


292 


124 


4 


CIWCILST 




CI List for Multi-String 
CA Split 


296 


128 


4 


CIWCISR8 




Register save for linkage 
return 


AMDSB Save Area for Updates to AMDSB Control Fields | 


300 


12C 


4 


CSXHLRBA 




AMDHLRBA index 


304 


130 


2 


CSXNIL 




AMDNIL index 


306 


132 


2 






UNUSED 


IXFORMAT Work Space 


308 


134 


4 


CIWIXFBA 




Save callers base 


312 


138 


4 


CIWIXFRT 




Save return register 


316 


13C 


4 


CIWLSEP 




Entry pointer for last 
section 


320 


140 


4 


CIWANLSE 




Entry address for last 
section 


324 


144 


4 


CIWANLE 




Last entry address 


328 


148 


2 


CIWKEYL 




Length of current key 


330 


14A 


2 


CIWNLSEL 




Length of last section key 


332 


14C 


2 


CIWNLEL 




Length of last entry key 


336 


150 


4 


CIWXNSA 




Address of next section 


340 


154 


4 


CIWXSOP 




Offset pointer of last 
section 


344 


158 


2 


CIWFCNT 




Format count 


346 


15A 


2 


CIWCINL 




Control entry length 


The following fie 


d must be of the same length as PLHWAREA 


3^8 


15C 


44 


CI WARE A 




Work area for RDF build | 


392 


188 


* 


CIWKEY 




Index work area j 



* Length = 5 x keylength 



CLOSE WORK AREA (CLWAAD) 





Offset 


Bytes and 






Dec 


Hex 


Bit Pattern 


Field Name 


Description 










WACOMMON 


Common Open/Close work area 




1 




1 


1 

1 

.1 

...1 .... 

1.. 

1. 

1 

1 


WAFLAG 

TCLOSE 

CLOSE 

OPEN 

OPAMDINX 

VOLFOUND 

SSFLAG 
RETRY 
FILEPROT 
WAERCODE 


Flag byte: 

Work Area for TCLOSE 

Work Area for Close 

Work area for Open 

Index AMDSB is being processed 

Volume serial number is in label 

cylinder record 

Sequence set with data 

Catalog should be reupdated by Close 

DOS Supervisor DASD file protect 

Error condition code 


2 


2 


2 


WALEN 


Length of GETVIS area 


4 


4 


4 


WAPIBSV 


Address of USERSAVE field 


8 


8 


4 


WALISTP 


Address of user ACB/DTF list 


12 


C 


2 


WACOMR 


Address of DOS communication region 


14 


E 


1 


EDBCODE 


One GETVIS obtains enough space for 
3 EDBsrthis field is used to count EDBs 


15 


F 


1 




Reserved 


16 


10 


4 


CATEXTPT 


Pointer to extent information in order 
to build EDBs 


20 


14 


2 


CATEXTLN 


Length of total extents 


22 


16 


2 


EXTNUMB 


Number of extents 


24 


18 


80 


USERSAVE 


Room to save user jobname, PSW, and 
registers (from partition save area) 


104 


68 





WORKAREA 


Close work area 


104 


68 


8 


TIME 


Time used to update catalog 


112 


70 


4 


RETREGl 


Return address of saveareo 1 


116 


74 


4 


RETREG2 


Return address of saveareo 2 


120 


78 





PARM 


Parameter list to be passed to IKQIASMD 


120 


78 


1 


CALLERID 


Caller ID 


121 


79 





DSID 


Data set ID 


121 


79 


3 


DSCI 


CI number 


124 


7C 


4 


CTACBPTR 


Address of catalog ACB 


128 


80 


1 


SHAREOPT 


Share option from catalog 


129 


81 


1 




Reserved 


130 


82 


2 


OUTCNT 


Number of output users returned from 
IKQLASMD 


132 


84 


1 

1 

.1 


BITBANK 
ENQACT 
ENQOPN 
UPDOPN 


Close flags 

USE macro was issued 

Enqueue on SYSOPEN 

Need to update OPEN indicator 

Reserved 


133 


85 


1 


SETOFLG 


Byte of zero for resetting OPEN indicator 


134 


86 


2 




Reserved 


136 


88 





CLAIXWA 


AIX work area 


136 


88 


4 


ACBREQ 


Address of ACB for which CLOS^TCLOSE 
is requested 


140 


8C 


4 


ACBBASE 


Address of base cluster ACB 


144 


90 


4 


USBADDR 


Address of USB 



CLOSE WORK AREA (CLWAAD) (CONrP...) 



Offset 


Bytes and 








Dec 


Hex 


Bit Pattern 


Field Name 


Description 




148 


94 


4 


ACBCURR 


Address of ACB currently being proces 


ed 


152 


98 


4 


RPLCURR 


Address of header RPL 




156 


9C 


1 

1 

.1 

. . .X xxxx 


AIXATTR 
AIXUPGRD 

AIXBASE 
AIXENTRY 


AIX attribute of current ACB 

Member of upgrade set but not path 

entry 

Base ACB 

Path entry ACB 

Reserved 




157 


9D 


1 

1 


AIXPROC 
UPGD2 


Processing status 

First member of upgrade set has been 

processed 

Reserved 




158 


9E 


2 


CLMSGFLG 


IKQOCMSG flags 




160 


AO 


8 


FTAB 


Resource name field for protection of 
file tab 




168 


A8 


8 


CAT 


Resource name field for protection of 
file tab 




176 


BO 


4 


USBCURR 


Address of current USB ACB 




180 


B4 


72 


REG SAVE 


Close register saveareo 




252 


FC 


72 


CATSAVE 


Catalog register savearea 




324 


144 





CATDATA 


Catalog data 




324 


144 


4 


CATLSTP 


Address of catalog list 




328 


148 


2 


CATLSTSZ 


Catalog list size 




330 


14A 


2 


CATWASIZ 


Catalog work area size 




332 


14C 


4 


CATV/APTR 


Address of catalog work area 




336 


150 





CATWA 


Catalog work area 




336 


150 


52 


DUMMY RPL 


Dummy RPL 




388 


184 


16 


DUMMY234 


Save area for registers 2 — 5 




404 


194 


540 


DUMMYPLH 


Dummy PLH for LSR 




944 


3 BO 


64 


DUMLSRA 


LSR savearea 




1008 


3F0 


52 


DUMDBHD 


Dummy data buffer header 




1060 


424 


52 


DUMIBHD 


Dummy index buffer header 





I 



CATALOG PARAMETER LIST (aCPL) 



Displacement 


Bytes and 


Field Name 


Description 


Dec Hex 


Bit Pattern 









1 


CTGOPTNl 


First option indicator : 




1 


CTGBYPSS 


Bypass the catalog management 
security verification processing 




.1 


CTGMAST 


Check the master password 




..1 


CTGCI 


Check the control interval password 




...1 .... 


CTGUPD 


Check the update password 




.... 1... 


CTGREAD 


Check the read password 




1.. 


CTGNAME 


The CTGENT field contains the address 
of a 44-byte DSNAAAE, or a 6-byte 
volume serial number (padded with 
binary O's) 




0.. 




The CTGENT field contains the 
address of a 3-byte control interval 
number 




1. 


CTGCNAME 


The CTGCAT field contains the 
address of a 44-byte catalog DSNAME 




0. 




The CTGCAT field contains the 
address of a VSAM catalog's ACB 




X 




Reserved 


1 1 


i 


CTGOPTN2 


Second option indicator: 




1 


CTGEXT 


Extend option (with UPDATE) 




.1 


CTGERASE 


Erase option (with DELETE) 






CTGREL 


Release (with UPDATE). Release 
secondary extents when data set 
is opened as reusable data set. 




..1 


CTGPURG 


Purge option (with DELETE) 






CTGVMNT 


Volume mount caller 




...1 .... 


CTGGTNXT 


Get-next option (with LISTCAT) 




.... 1... 


CTGDISC 


Disconnect option (with DELETE) 




1.. 


CTGOVRID 


Erase override option (with DELETE) 






CTGSCR 


Scratch space option (with DELETE) 




^ 




Reserved 


2 2 


i 


CTGOPTN3 


Third option Indicator : 




XXX 


CTGFUNC 


Specifies the caller-requested function : 




001 


CTGLOC 


LOCATE 




on 


CTGUPDAT 


UPDATE 




100 


CTGCMS 


A Catalog Management Services 
function (see CTGOPTNS) 




...1 .... 


CTGMCE 


Master Catalog exists 




.... X. . . 




Reserved 




I.. 


CTGSRH 


Reserved for OS 




1. 


CTGNUM 


Reserved for OS 




1 


CTGAMO 


VSAM request versus non- VSAM 


3 3 


1 


CTGOPTN4 


Reserved for OS 


4 4 


4 


CTGENT 


Address of the catalog record identifier, 
as defines in CTGOPTNl 






CTGFVT 


Address of the caller's CTGFV 


8 8 


4 


CTGCAT 


Address of the catalog's DSNAME or 
ACB, as specified in CTGOPTNl 


12 C 


4 


CTGWKA 


Address of the caller's work area 



CATALOG PARAMETER LIST (CTGPL) (...Continued) 



Displacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 






16 


10 


2 


CTGOPTNS 


Catalog Management Services 
request options : 






0000 1 .. . 


CTGDEFIN 


DEFINE 






0001 0... 


CTGALTER 


ALTER 






0001 1... 


CTGDELET 


DELETE 






0010 0... 


CTGLTCAT 


LISTCAT 






XXX 




Reserved 


17 


11 


1 

1 

.1 

. .XX xxxx 


CTGCRFLG 
CTGLBCYL 

CTGCTRBL 


CRA open flags 

Label cylinder information is passed 

for CRA 

Control blocks are passed for CRA 

Reserved 


18 


12 


1 


aGTYPE 


Type of catalog record 






CD' 


CTGTDATA 


Data 






CI' 


CTGINDX 


Index 






C'A' 


CTGALIN 


Non-VSAM 






C'U' 


CTGTUCAT 


User catalog 






CV 


CTGTVOL 


Volume 






C'C 


CTGTCL 


Cluster 






CM' 


aGTMCAT 


Master catalog 






CO' 


CTGTAIX 


Alternate index 






CR' 


CTGTPTH 


Path 






CY' 
CF' 


aCTUPG 
CTGTFREE 


Upgrade set 


Free Record 


19 


13 


1 


CTGNOFLD 


Number of entries contained in 
CTGFIELD 


20 


14 


4 


CTGDDNM 
CTGNEWMN 


Address of the DLBL statement ; if one 
is associated with this recpjest 
Address of the new DSNAME ; if the 










request Is being changed 


20 


14 


2 


CTGFDBK 


Module Name Feedback 

(Last 2 charaeters of Module Name) 


22 


16 


1 


CTGFBFLG 


Reason Code Feedback 


23 


17 


1 




Reserved 


24 


18 


4 


CTGPSWD 


Address of the caller-supplied 
password 


28 


IC 


4 


CTGDDUC 


Address of UCAT file name 


32 


20 


4 


CTGDDCR 


Address of CRA file name 


36 


24 


4 


aCFIELD 


Field pointers 


40 


28 


4 


CTGFLD2 


Second field pointer 


44 


2C 


4 


CTGFLD3 


Third field pointer 



I 



DADSM PARAMETER LIST 





Offset 




1 


Hex. 




Dec 


Hex 


Bytes 


Field Name 


Digit 


Description 








6 


DADVOLID 




Volume identifier 


6 


6 


2 


DADSYSLN 




Number of system LUB 


8 


8 


2 


DADSFLAG 




Processing flags 
First byte: 








DADRFl 


X'80' 


Read format 1 label 








DADFR4 


X'40' 


Read format 4 label 








DADRADDR 


X'20' 


Address for read 








DADBYPS 


X'lO' 


Bypass volume 1 checking 








DADNGV 


X'08' 


No GETVIS required 








DADLKLBK 


X'04' 


IKQLAB has been called 








DADSPROT 


X'02' 


Scratch/rename protected files 








DADSVTAD 


X'01' 


VTOC address is valid 
Second byte: 








DADSVTOP 


X'80' 


VTOC open indicator 








DADSMSG 


X'40' 


Message flag 








DADSKPF4 


X'20' 


DADSM Caller is DADSM 








DADBYEXT 


X'lO' 


Extents bypassed 








DADSCNCL 


X'08' 


Operator reply was cancel 


10 


A 


1 


DADSRC 




DADSM return code 


11 


B 


1 


DADSARC 




Return code save area 


12 


c 


4 


DADSLADD 




Address of label record 


16 


10 


4 


DADSAREA 




Address of T/O area 


20 


14 


44 


DADEXIST 




Old data set name 


20 


14 


44 


DADSRDSN 




Returned data set name 


64 


40 


44 


DADCREAT 




New data set name 


108 


6C 


4 


DADS EX IT 




DADSM exit address 


112 


70 


24 


DADSWORK 




Work area 


112 


70 


4 


DADSWA 




Parameter 1 


116 


74 


4 


DADSAVE 




Work area 


116 


74 


4 


DADPARM2 




Parameter 2 


120 


78 


5 


DADSPTR 




Work area 


125 


7D 


1 


DADCODEA 




Work area 


126 


7E 


2 






Reserved 


128 


80 


4 


DADBLD 




Work area 


132 


84 


4 


DAD EXT 




Work area 


136 


88 


8 


DADATE 




Date 


144 


90 


8 


DADSVTOC 




VTOC address 


144 


90 


2 






Reserved 


146 


92 


4 


DADSVST 




CCHH of VTOC 


150 


94 


2 






Reserved 


152 


98 


4 


DADSVEND 




CCHH of end of VTOC 


156 


9C 


8 


DADFLPTR 




File name 


164 


A4 


2 


DADHH 




Number of tracks on device 


166 


A6 


4 


DADSTNl 




Save area for IKQRDSOO 



DEFINE THE FILE INDEXED SEQUENTIAL (DTFIS) TABLE 



Displacement 


Bytes and 
Alignment 


Field Name 


Hex 
Digit 


Description 


Dec 


Hex 








16 


DTFCCB 






2 


2 


1 


DTFCCBB2 






2 


2 




ERREXT 


X'lO- 


Accept physical I/O 
error 


16 


10 


1 


FLAGBYTE 












AMODTF 


X'80' 
X'20' 


VSAM bit set to 1 if 
DTF belongs to a 
VSAM data set 
Assign "ignore" bit 


17 


11 


.3 


LOGMODAD 




Address of logic module; 
if AMODTF is set to 1, 
then address of branch 
vector 


20 


14 


1 


FiLETYPE 




File type 








LOAD 


X'24' 


LOAD-type DTF 








ADD 


X'25 


ADD-type DTF 








RETRVE 


X'26' 


RETRIEVE-type DTF 








ADDRTR 


X'27' 


ADD-RETRIEVE type 
DTF 


21 


15 


.1 


OPTIONSl 




Options byte 1 
(ISAM options) 








BLKDRECS 


X'08' 


Blocked records 


22 


16 


7 


FNAMEDTF 




File name (DDname) 


29 


ID 


.1 


OPTIONS2 




Options byte 2 (not 
used by IIP) 


30 


IE 


..1 


FNAMEC 
LOAD files: 




Status byte 








UNCIOERR 


X'80' 


Uncorrectable DASD 
I/O error 








WRGLEN 


X'40' 


Wrong length record 
(not used by IIP) 








PDARFULL 


X'20' 


No more VSAM data 
space available 








CYLXFULL 


X'lO- 


No more VSAM data 
space available 








MASXFULL 


X'08' 


No more VSAM data 
space available 








DUPREC 


X'04' 


Duplicate record 








SEQCHECK 


X'02' 


Sequence check 








PDAROVFL 


x'or 


Prime data area over- 
flow (not used by IIP) 








Non-LOAD 












files: 












UNCIOERR 


X'80' 


Uncorrectable DASD 
I/O error 








WRGLEN 


X'40' 


Wrong length record 
(not used by IIP) 








EOF 


X'20' 


End of file 








NORECFND 


X'lO' 


No record found 








ILLEGID 


X'OS. 


Illegal identifier speci- 
fied (not supported by 
IIP) 



DEFINE THE FILE INDEXED SEQUENTIAL (DTFIS) TABLE (. . . .Cont'd) 



Displacement 


Bytes and 
Alignment 


Field Name 


Hex 
Digit 


Description 


Dec 


Hex 








DUPREC 


X'04' 


Duplicate record 








OFARFULL 


X'02' 


No more VSAM data 
space available 








OVFLREC 


x'or 


Overflow record 
(RETRVE) (not used by 
IIP) 


31 


IF 


12 






Not used by VSAM 


43 


2B 


...1 


RTRBYTE 




RETRVE byte 








WORKR 


X'80' 


WORKR set to 1 if 
WORKR specified 








WORKS 


X'40' 


WORKS set to 1 if 
WORKS specified 


44 


2C 


4 


AMDTFAD 




Address of AMDTF 


48 


30 


4 


CIPROCAD 




Address if IIP 
processor 


52 


34 


4 


SAVERG 




Save area for one 
register 


56 


38 


4 


PPRETAD 




Return address to 
problem program if 
called from a $$B phase 


60 


3C 


4 


RECLOC 




Address of record for 
LOAD lOREG 


64 


40 


1 


CISWITCH 




IIP switches 








WNKA 


X'80' 


Write-new-key-add 
bit 








RKWK 


X'40' 


Read-key-write-key 

bit 

Read-key bit 








RK 


X'20' 








FIRWITE 


X'08' 


First write after SETFL 








FIWOK 


X'04' 


First write is all right 








LD 


X'02' 


LOAD 


65 


41 


9 






Not used by VSAM 


74 


4A 


..2 


LRECLEN 




Logical record length 


76 


4C 


2 


KEYLEN 




Key length 


78 


4E 


16 






Not used by VSAM 


94 


5E 


..2 


KEYLOC 




Key location (not used 
by IIP) 


96 


60 


4 


KARGADl 




Address of KEYARG, 
moved from part 2 by 
IIPOPEN if RTRSEQ 
with KEY (POINT) or 
RTR RAN is specified 


100 


64 


2 


DSPLPRT2 




Displacement of part 2 
(ADD, RTR) 


102 


66 


-.2 


DSPLPRT3 




Displacement of part 3 
(ADD, RTR) 


104 


68 


4 


LDIOREGS 




For RTR SEQ : if 
WORKS=l, then NOP; 
if WORKS=0, then 
L lOREG, RECLOC 


108 


6C 


4 


LDIOREGR 




For RTR RAN : If 
WORKR=l, then NOP; 
if WORKR=0, then 
L lOREG, RECLOC 



DEFINE THE FILE INDEXED SEQUENTIAL (DTFiS) TABLE (. . . . Cont'd) 



Displacement 


Bytes and 


Field Name 


Hex 


Description 


Dec Hex 


Alignment 




Digit 




112 70 




WORK AD 1 




Address of WORKR 
moved from part 2 


116 74 




lOASADl 




Address of iOAREAS 
moved from part 2 


120 78 


64 


SAVARl 




For LOAD-type DTF, 
save area for IIPOPEN 


184 B8 




lOARLAD 




Address of lOAREAL 
for LOAD 


188 BC 




DATIWLAD 




Address of data in 
WORKL for LOAD 


192 CO 




KEYIWLAD 




Address of key in 
WORKL for LOAD 


196 C4 








Not used by VSAM 


200 C8 




MIXEXTI 




Master index extension 
indicator for LOAD 






CROREXT 


X'lO' 


Create-extend bit 
(create=0; extend=l) 


201 C9 








Not used by VSAM 


204 CC 




WORKLAD 




Address of WORKL 
for ADD 


208 DO 


16 






Not used by VSAM 


224 EO 


2 


KLMl 




KEYLEN-1 for LOAD 


Part 2 of DTF 





'8 






Not used by VSAM 


8 8 




IOASAD2 




Address of iOAREAS 


12 C 




lOARAD 




Address of iOAREAR 


16 10 




KARGAD2 




Address of KEYARG 


20 14 




WORKRAD2 




Address of WORKR 


24 18 




CURIOAAD 




Address of current 
sequential I/O area 


28 IC 


4 


LiOREGS 




L lOREG, *4 or NOP 
(RTR SEQ) 


32 20 


36 






Not used by VSAM 


68 44 


2 


NTAGRECS 




Number of records 
tagged for deletion 


70 46 


..2 


LIOREGR 




LR lOREG, or NOP 
(RTR RAN) 


Part 3 of DTF 





64 


SAVAR2 




Save area for IIPOPEN, 
not LOAD type 



I 



EXIT LIST (EXIST) 



Displacement 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 










1 


EXLID 




Control block 
identifier=X'81' 



1 



1 


1 
1 


EXLIDD 
EXLSTYP 


x'sr 

X'OO' 
X'lO- 
X'20' 


EXLST identifier equate 
Release Indicator 
VSAM Release 1 
VSAM Release 2 
VTAM 


2 


2 


2 


EXLLEN 




Length of EXLST 


4 


4 


1 


EXACT 




Active Byte 


5 


5 


5 


EXLEOD 




EODAD entry 


5 


5 


1 


EXLEODF 




Entry description bits 


6 


6 


4 


EXLEODP 




Address of the EODAD 
exit routine 


10 


A 


5 


EXLSYN 




SYNAD entry 


10 


A 


1 


EXLSYNF 




Entry description bits 


11 


B 


4 


EXLSYN P 




Entry of the SYNAD 
exit routine 


15 


F 


5 


EXLLER 




LERAD entry 


15 


F 


1 


EXLLERF 




Entry description bits 


16 


10 


4 


EXLlfRP 




Address of the LERAD 
exit routine 


20 


14 


5 


EXLIOEX 




EXCPAD entry 


20 


14 


1 


EXLIOEXF 




Entry description bits 


21 


15 


4 


EXLIOEXP 




Address of the EXCPAD 
exit routine 


25 


19 




EXLJRN 




JRNAD entry 


25 


19 




EXURNF 




Entry description bits 


26 


lA 




EXLJRNP 




JRNAD pointer 


Bits used 


in indiv 


idual exit f 


ags in bytes show 


T as entry de 


scription 








EXENEXB 


X'80' 


Entry present bit 








EXENACTB 


X'40' 


Entry active bit 








EXENLEB 


X'20' 


Load bit 


Minimum 


length 


EXIST for sp 


ecified entry: 














Dec. 










EXLEODL 


Digit 


Minimum length if EODAD 


10 








EXLSYNL 


15 


Minimum length if SYNAD 








EXLLERL 


20 


Minimum length if LERAD 








EXLIOEXL 


25 


Minimum length if EXCPAD 








EXLJRN 1 


30 


Minimum length if JRNAD 


Minimum 


and ma 


<imum size < 


>f EXLST : 












EXLMINL 


10 


Minimum length of EXLST 








EXLMAXL 


30 


Maximum length of EXLST 



EXTENT DEFINITION BLOCK (EDB) 



Dlspb 


cement 


Bytes 


Field Name 


Hex 
Digit 


Description 


Dec 


Hex 








4 


EDBNEDB 




Address of next EDB 


4 


4 


2 


EDBSYMU 




Symbolic unit (for CCB) 


4 


4 


1 


EDBSUCLS 




Symbolic unit class 


5 


5 


1 


EDBSUNUM 




Symbolic unit number 


6 


6 


2 


EDBNUMTR 




Number of tracks of 
extent 


8 


8 


1 


EDBFLGS 




Flags 








EDBDWSS 


X'80' 


Data RBA with sequence 
set 








EDBSSWD 


X'40' 


Sequence set RBA with 
data 








EDBIXREP 


X'20' 


Index replication 








EDBMNT 


X'lO' 


Volume mount flag 








EDBLGCC 


X'08' 


Device contains more 
than 256 cylinders 








EDBRPS 


X'04' 


Indicates RPS Device 


9 


9 


3 


EDBMBB 




EDB 


9 


9 


1 


EDBM 




Extent (M) 


10 


A 


2 


EDBBB 




Bin number (BB) 


12 


C 


8 


EDBXTNT 




Force low and high 
CCHH next to each other 


12 


C 


4 


EDBLCCHH 




Low cylinder and head 
numbers 


12 


C 


2 


EDBLCC 




Lowest cylinder 


14 


E 


2 


EDBLHH 




Lowest head 


16 


10 


4 


EDBHCCHH 




High cylinder and head 
numbers 


16 


10 


2 


EDBHCC 




Highest cylinder 


18 


12 


2 


EDBHHH 




Highest head 


20 


14 


4 


EDBLPMBA 




Address of associated 
LPMB 


24 


18 


4 


EDBPARDB 




Address of ARDB 


28 


IC 


2 


EDBVLSQ 




Index to the VOLSER list 


30 


IE 


2 


EDBSTTRK 




Relative track address of the 
start of the extent 


32 


20 


8 


EDBRBAS 




Force low and high RBAs 
next to each other 


32 


20 


4 


EDBLORBA 




Low RBA limit 


36 


24 


4 


EDBHIRBA 




High RBA limit 



FIELD CONTROL AND DATA BLOCK (FCDB) 



Offset 




Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 










64 


FCB 




Maps the module FCB 








56 






Space for use in the block 


56 


38 


1 


FCBTIC 




Reserved for a TIC 
operation code 


57 


39 


3 


FCBCHAIN 




Pointer to next block 


60 


3C 


1 


FCBCFL 




Reserved for chaining flag 


61 


3D 


1 


FCBALI 




Aliication indicator 








FCBPRVA 


X'04' 


Previous request allocated 








FCBPRVSV 


X'08' 


Previous request save 


62 


3E 


2 


FCBOFSET 




Offset pointer in block 



FIELD PARAMETER LIST (CTGFL) 



Displacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 








1 




1 


1 
1 
X'OO' 

X'nonOO' 

X'80' 
X'60' 
X'20' 
X'40' 
X'AO' 
X'CO' 
X'80' 
X'lO' 
X'40' 


CTGFLDNO 
aCFLDCD 


Number of entries in CTGFLDAT 

Test condition : 

The FPL describes a field to be 

updated or retrieved. The FPL is 

pointed to by the caller's CTGPL 

(CTGFIELD entry). 

The FPL describes a test condition. 

The FPL is pointed to by another FPL. 

Test condition : 

Equal 

Not equal 

Greater than 

Less than 

Greater than or equal 

Less than or equal 

Test under mask for zeros 

Test under mask for ones 

Test under mask for mixed 


2 


2 


1 


CTGFLDGC 


Group code number 


3 


3 


1 



1 


CTGFLDRE 


Test results : 
Reserved 
Successful test 
Test failed 


4 


4 


4 


CTGFLDWA 


Work area : contains information about 
the catalog record's field name from 
the dictionary 


8 


8 


4 


CTGFLDNM 


Address of the field name 


12 


C 


4 


CTGFLCHN 


Address of next field macro or zero 


16 


10 




aGFLDAT 


Pairs of data length/address 


16 


10 


4 


CTGFLNG 


Data length 


20 


14 


4 


CTGFLPT 


address in the callers work 
area of 

• Each field that was retrieved, if 
the request was LOCATE or CMS 
LIST-CAT 

• New data to replace or add to data 
in the catalog record. The request 
was UPDATE, CMS DEFINE or CMS 
ALTER 

• Data used to compare to catalog 
record fields, if the FPL is a FPL- 
f or -tests. 



I 



FIELD VECTOR TABLE (CTGFV) 



Displacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 












1 


CTGFVTYP 


The CTGFV contains information used 
by the CMS Define routines to build 
a catalog record of the type : 






C"A" 


CTGFVALN 


NonVSAM 






C"C" 


CTGFVCL 


Cluster 






CD" 


CTGFVDTA 


Data 






C"l" 


CTGFVIDX 


Index 






C'V 


CTGFWOL 


Volume 






C"G" 


CTGFVAIX 


Alternate Index 


1 


1 


C"R" 
1 

1 

.1 


CTGFVPTH 
CTGFVPRO 
CTGFVAVL 
CTGFVRVL 


Path 
CMS processing option flags : 
ALTER : Add volumes 
ALTER : ftemove volumes 






..1 


CTGFVNDC 


Device type converted switch 






...X xxxx 




Reserved 


2 


2 


1 


CTGFVELM 


Element number of CMSPCATR 


3 


3 


1 




Reserved- 


4 


4 


4 


CTGFVDCH 


Address of the cluster's data set FVT 


8 


8 


4 


CTGFVICH 


Address of the cluster's index FVT 


12 


c 


4 


CTGFWCH 


Address of the space vector table 


16 


10 


4 


CTGFVIND 


Address of the associated DLBL 
statement 


20 


14 


4 


CTGFVENT 


Address of the 44 byte entry name 


24 


18 


4 


CTGFVSTY 


Address of the security information 
FPL (passwords, codewords, and 
number-of -tries) 


28 


IC 


4 


CTGFVOWN 


Address of the owner odentification FPL 


32 


20 


4 


CTGFVEXP 


Address of the expiration date FPL 


36 


24 


4 


CTGFVCRE 


Address of the creation date FPL 


40 


28 


4 


CTGFWLT 


Address of the volume serial number list 


44 


2C 


4 


CTGFVRNG 


Address of the key range list 


48 


30 


4 


CTGFVDVT 


Address of the device type FPL (for 
NonVSAM DEFINE only) 


52 


34 


4 


CTGFVSPC 


Address of the space allocation 
information FPL 


56 


38 


4 


CTGFVAMD 


Address of the AMDSB FPL (if VSAM 
DEFINE) 


56 


38 


4 


CTGFVFSN 


Address of the file sequence number 
(if NonVSAM DEFINE) 


60 


3C 


4 


CTGFVATR 


Address of the data set attributes FPL 


64 


40 


4 


CTGFVBUF 


Address of the buffer size FPL 


68 


44 


4 


CTGFVLRS 


Address of the average record size FPL 


72 


48 


4 


CTGFVEXT 


Address of exception exit 


76 


4C 


4 


CTGFVNAM 


Address of related object 


80 


50 


4 


CTGFVUPG 


Address of RGATTR FPL 


84 


54 


4 


CTGFVWKA 


Address of CRA volume identification 


88 


58 


4 


CTGFVPWD 


Relationship password 



LOGiCAL-TO-PHYSICAL MAPPING BLOCK (LPMB) 



Displacement 


Bytes 


Field Name 


Hex 
Digit 


Description 


Dec Hex 




1 1 

2 2 

4 4 

8 8 

12 C 
16 10 

18 12 

20 14 

22 16 


1 

1 

2 
4 

4 

4 
2 

2 

2 

2 


LPMID 
LPMBDTF 

LPMLEN 
LPMBPTRK 

LPMCASZ 

LPMBIKSZ 
LPMTRKCA 

LPMTPC 

LPMBNQBK 

LPMBPBCI 


X'FF' 


Control block identifier 
Device type 
indicator 

Length of the LPMB 

Number of bytes per 

track 

Number of bytes per 

control area 

Physical block size 

Number of tracks per 

control area 

Number of tracks per 

cylinder 

Number of physical 

records per track 

Number of blocks 

per CI 



I 



OPEN ACB LIST (OAL) 



Offset 




Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 










1 


OALID 




OAL identifier 


1 


1 


1 


OALIDD 


x'fo 


OAL FD equate 
Reserved 


2 


2 


2 


OALLEN 


x'ooso' 


Length of this block 


4 


4 


4 


OALNOAL 




Pointer to next OAL 


8 


8 


2 


OALNOPN 




No of open data sets or 
partitions 


10 


A 


2 


OALNENT 


X'OOOE' 


No. of OAL entries 


12 


c 


4 


OALSAVE 




Save area for interrupt 
information during auto- 
matic close; data consists 
of interrupt length (2 bytes) 
and interrupt code (2 bytes) 


16 


10 





OALENTRY 




Entry description 
(repetitive) 


16 


10 


4 


OALACB 




Address of opened ACB 


20 


14 


1 


OALSVC 




Delimiter (X'GA') 


21 


15 


1 


OAlfLG 




F lag byte 








OALACT 


X'80' 
X'40' 
X'20' 
XMO' 
X'08' 
X'04' 
X'02' 

x'or 


ACB is open 

Reserved 

Reserved 

Reserved 

Reserved 

Reserved 

Reserved 

Reserved 


22 


16 


2 


OALCICHK 




Value to check validity 
of cylinder no. of data set 
in catalog 



OPEN WORK AREA (IKQOPNWA) 



Displacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 














WACOMMON 


Common Open/Close work area 



1 




1 


1 

1 

,1 

..1 

...1 .... 
.... 1... 

1.. 

1. 

1 

1 


WAFIAG 

TCLOSE 

CLOSE 

OPEN 

OPAMDINX' 

VOLFOUND 

SSFLAG 
RETRY 

FILEPROT 
WAERCODE 


Flag byte : 

Work area for TCLOSE 

Work area for CLOSE 

Work area for OPEN 

index AMDSB is being processed 

Volume serial number is in label 

cylinder record 

Sequence set with data 

Catalog should be reupdoted by 

CLOSE 

DOS Supervisor DASD file protect 

Error condition code 


2 


2 


2 


WALEN 


Length of GETVIS area 


4 


4 


4 


WAPIBSV 


Address of partition user save area, 
copy of user PSW, registers 


8 


8 


4 


WALISTP 


Address of user ACB/DTF list 


12 


C 


2 


WACOMR 


Address of DOS communication 
region 


14 


E 


1 


EDBCODE 


One GETVIS obtains enough space 
for 3 EDBs; this field is used to 
count EDBs 


15 


F 


1 




Reserved 


16 


10 


4 


CATEXTPT 


Pointer to extent information in 
order to build EDBs 


20 


14 


2 


CATEXTLN 


Length of total extents 


22 


16 


2 


EXTNUMB 


Number of extents 


24 


18 


80 


USERSAVE 


Room to save user job name, PSW 
and registers 


104 


68 





WACOMEND 


End of common work area 


104 


68 





OWA 


Partial map of work area obtained 
by GETVIS issued by $$BOVSAM 


104 


68 


4 


WAVSLOD 


Address of location where VSAM 
has been placed by CD LOAD 
(set by SSBOVSAM) 


108 


6C 


4 


WAIKQLAB 


Address of location where IKQLAB 
has been placed by CD LOAD 
(set by SSBOVSAM) 


112 


70 


4 


WARACB 


Pointer to ACB being opened 


112 


70 


4 


CLWAAD 


Close work area address saved 


116 


74 


1 


LBLRCLEN 


Length of work area pointed to by 
LABICPTR in multiple of 128 


117 


75 


3 


LABICPTR 


Pointer to work area reserved for 
label record 


120 


78 


4 


SVCATACB 


Pointer to catalog ACB 


124 


7C 


4 


CTGPLPTR 


Pointer to catalog parameter list 
(CPL) 


128 


80 


4 


CATWKPTR 


Pointer to catalog work area 
(CTGWA) (contents moved to CPL) 


132 


84 


4 


OLDEDB 


Address of last EDB 


136 


88 


4 


NXTEDB 


Address to next EDB 



I 



OPEN WORK AREA (IKQOPNWA) (. . .Continued) 



Displacement 
Dec Hex 


Bytes and 
Bit Pattern 


Field Name 


Description 


Catalog Field List for AMDSB 


140 8C 

140 8C 

140 8C 
144 90 
144 90 
148 94 
148 94 


8 

4 

4 
4 
4 
4 
4 


FLAMDSB 

SAVERETl 

RETREGl 

SAVERET2 

RETREG2 

FLAMDSBN 

RETREG3 


Catalog field list work area 
(CTGFLDWA) for AMDSB 
Pointer to contents of return 
register (R14) if not catalog call 
Return address to save area 1 
Return address to save area 2 
Return address to save area 2 
Pointer to catalog field name 
AMDSBCAT 


152 98 
156 9C 
160 AO 


4 
4 
4 


FLAMDSB L 
FLAMDSBA 


NextCTGFLCHN Number 
Length of AMDSBCAT 
Address of AMDSBCAT 


Catalog Field List for Volume Entry(ies) 


164 A4 
164 A4 

166 A6 


8 
2 

2 


FLEN7VOL 
KRNKEYS 

KRNV015 


No. of key ranges equals number 

of ARDBs 

Number of volumes for this key 


172 AC 
176 BO 
176 BO 
180 B4 
184 B8 


4 
4 
4 
4 
4 


FLVOLNTN 

SVLfNG 

VOLENTLN 

VOLGPPTR 


range 

Volume entry name VOLENT 

Length of ENTVOL 
Length of volume entry 
Address of VOLENT data 


Catalog Field List for Data Set Attributes 


188 BC 
208 DO 


20 

4 


FLDSATRA 


DSATTR field list 
Base of DSATTR 


Catalog Field List for Open Indicator 


212 D4 
220 DC 
224 EO 
228 E4 
232 E8 


8 
4 
4 
4 
4 


FLOPNIND 
FLOPNINN 

FLOPNINL 
FLOPNINA 


Locate OPENIND and test for UPD 
Open indicator field list 

Length of OPENIND 
OPENIND address 


Catalog Field List for Minimum Buffer Size 


236 EC 
256 100 


20 
4 


FLBUFSZA 


Flags, etc., for BUFSIZE 
Base of BUFSIZE 


Catalog Field List for High-Used RBA per Data Set 


260 104 
260 104 
280 118 


20 
20 
4 


NVOLLIST 
FLHURDSA 


Miscellany for HURBADS 
No. of volumes per key range 
Base for HURBADS 



Multi-use field 



OPEN WORK AREA (IKQOPNWA) (....Cont'd) 



Displacement 


Bytes and 
Bit Pattern 


Field Name 


Description 


Dec Hex 


Catalog Field List for ISAM Compatibility (USERINFO) 


284 lie 
304 130 


20 

4 


FLFILTA 


CATFILE field list 
Base for CATFILE 


Catalog Field List for Names of Related Data Sets 


308 134 
308 134 
308 134 

312 138 

313 139 
316 13C 
320 140 
324 144 
324 144 
328 148 
328 148 


8 
8 

4 
1 
3 
4 
4 
4 
4 
4 
4 


FLNAMEDS 

PARMLIST 

PARMl 

PARMLEN 

PARM2 

FLNAMDSN 

FLNAMDSL 
NAMEDSLN 
NAMEDSPT 
FLNAMDSA 


Flags for NAMEDS 

IKQVLAB parameter list 

ACB address 

Length of work area for IKQLAB 

Pointer to "LABICPTR" 


Pointer to 'NAMEDS' 

Length of associated names 
Length of associated names 
Address of NAMEDS entry 
Address of NAMEDS groups 


Catalog Field List for Entry Type and Control Interval No. 


332 14C 
340 154 
344 158 
348 15C 
352 160 


8 
4 
4 
4 
4 


FLMiSCLN 

FLMISCLL 
FLMISCIA 


CTGFLDWA for this field list 
Pointer to 'DSTYPNAM' 

Length of DSTYPNAM 
Address of DSTYPNAM 


Catalog Field List to Find Catalog ACB Address 


356 164 
376 178 


20 

4 


FLCATACB 
FLCTACBA 


Field list nr. 10 for catalog ACB 
Pointer to catalog ACB pointer 


Catalog Field List to Test for Write of Open Indicator 


380 17C 
380 17C 
384 180 
388 184 
392 188 
396 18C 
400 190 


8 


FLWOPNND 
TSTENTVL 
TSTENTLN 
FLWOPNNN 

FLWOPNNL 
FLWOPNNA 


Update OPENIND field list 
Address of test ENTVOL (scan) 
Address of end scan ENTVOL 
Pointer to 'OPENIND' 

Length of data 
Pointer to data 


Catalog Field List for Volume Time Stamp 


404 194 
404 194 
424 1A8 


24 
20 
4 


FLTMSTVF 
FLTM5TVA 


VOLTSTMP field list 
Pointer to 'VOLTSTMP' 



OPEN WORK AREA (IKQOPNWA) (. . . Cont'd) 



Displacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 






End of Oitalog 


Field List for V 


/olume Time Stamp 


428 


1AC 


1 


WARNFLG 


Used to save warning error code 


429 


IAD 


1 




Reserved 


430 


1AE 


2 


I 


Index for DO loops 


432 


IBO 


2 


LIMIT 


Count of ENTVOLS (pointed to by 
VOL20PT) 


434 


1B2 


2 


RELGP 


Relative group number in the 
catalog 


436 


1B4 


2 


TEMP 


Local calculations (on same 
listing page) 


438 


1B6 


2 


lARDB 


Index for ARDB list 


440 


188 


4 


SAVDEV 


Used to save device type 


444 


IBC 


4 


SAVDEV2 


Used to save sequence set device 
type 


448 


ICO 


2 


SAVTRKAU 


Used to save number of tracks per 
allocation unit (control area) to 
help identify type of LP MB 


450 


1C2 


2 


SAVTRKA2 


Same as SAVTRKAU but used only 
if sequence set with data 


452 


1C4 


4 


RLPMB2 


Pointer to sequence set (index) 
LPMB 


456 


ICB 


1 

1 

.1 

'.'.A '.'..'. 

.... 1... 

1.. 

1. 


OWAFLAGS 
OWFLAGZB 

OWFLAGBF 
OWFLAGIB 
WARSOPEN 

DTACNT 
iDXCNT 
WARSaLG 


Open flags and switches 

User did not specify buffer size 

inACB 

BCB building in process 

Got buffer with AMBL for index 

Use macro has been issued for 

SYSOPEN (RELEASE macro must 

subsequently be issued) 

Open count in look-aside table 

is bumped for data 

Open count in look-aside table 

is bumped for Index 

USE macro has been issued for 

SYSaLG (RELEASE macro must 

subsequently be issued) 

Reserved 


457 


1C9 


3 


INDEXSAV 


Used to save Index file name 


460 


ICC 


1 


SAVTYPE 


Used to save entry type when 
entry is not a cluster 


461 


ICD 


2 




Reserved 


463 


ICF 


4 


TESTSVl 


Save word for testing 


467 


1D3 


1 

1 

. XXX xxxx 


SVOPNIN 
SVOPNINO 


Updated OPENIND for catalog 
Flag open for output 
Reserved 


468 


1D4 


2 


SVNEXTNT 


Save number of EXTENT statements 


470 


1D6 


2 


SETNBUF 


Count of buffers (used by SETADDR) 


472 


1D8 


4 


VOLSTPTR 


Address of IDAVLST 


476 


IDC 


4 


VOLENTND 


EndofallENTVOb 



* Multi-use field 



OPEN WORK AREA (IKQOPNWA) (...Cont'd) 



Displacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 






480 


lEO 


2 


VOLENia 


Count of volume entries 


482 


1E2 


2 


IVOLS 


Working index of VOLENTs 


484 


1E4 


4 


VOL20PT 


Pointer to volume entries to sort 
(address of VOLENT20 if less 
than 20) 


488 


1E8 


80 


VOLENT20 


Volume entries to sort 


568 


238 


4 


VMTPTR 


Pointer for right VOLSER 


572 


23C 


4 


REQBUFSP 


Minimum buffer space required 


576 


240 


4 


CURBUFSP 


Currently specified buffer space 


580 


244 


4 


CURBFSPD 


Current buffer space specified for data 


584 


248 


32 


ADDAREA 


Room to odd without current 
specifications for index 


584 


248 


4 


CURBFSPI 


Current buffer space specified for index 


588 


24C 


1 


SVLUBPUB 


Save index of PUB 


589 


24D 


1 


NEXTJIB 


Next JIB saved 


590 


24E 


10 


SVPUB 


LUBs for mounted volumes 


600 


258 


2 


IPUB 


Index for SVPUB 


602 


25A 


4 


WRKCINV 


Control interval size used in 
pointing BCBs to buffers 


606 


25E 


8 


OWAPRTCT 


Room to build password 


614 


266 


2 




Unused 


616 


268 


12 


PARM 


Parameter list for IKQLASMD 


616 


268 


1 


CALlfRID 


Caller identification 


617 


269 


7 


DSID 


Data set identification 


617 


269 


3 


DSCI 


Control interval number 


620 


26C 


4 


CTACBPTR 


Pointer to catalog ACB 


624 


270 


1 


SHAREOPT 


Share option from catalog 


625 


271 


1 




Reserved 


626 


272 


2 


OUTCNT 


Number of output users, returned 
from IKQLASMD 


628 


274 


72 


OWPLSAVE 


Save area formatted according to 
Pl/S standards 


700 


28C 


72 


OWPLSAV2 


Save area 2 formatted according to 
PiyS standards 


77-2 


304 


80 


DUMCATPL 


Room for catalog parameter list 


852 


354 


512 


OWAaWKA 


Normal catalog work area 


1364 


554 


8 


CCWX 


CCW definition 


1364 


554 


1 


CCWCODE 


Write-to-console op code 


1365 


555 


3 


CCWDTA 


Pointer to message buffer 


1368 


558 


2 


* 




1370 


55A 


2 


CCWCNT 


Length of message buffer 


1372 


55C 


24 


CCBX 


CCB definition 


1372 


55C 


9 


* 




1381 


565 


3 


CCWPT 


Pointer to channel program (CCWX) 


1384 


568 


12 




Unused 


1396 


574 


65 


VMSG 


Volume name is built and used as part 
of calling parameter when catalog 
is called to get the time stamp 


1396 


574 


65 


MSG 


Volume time stamp built 


1396 


574 


11 


MSGID 


Message identification 



I 



OPEN WORK AREA (IKQOPNWA) ( Cont'd) 



Displacement 


Bytes and 


Field Name 


Description 


Dec 


Hex 


Bit Pattern 






1407 


57F 


8 


MSGDSN 


Data set name 


1415 


587 


46 


MSGTXT 


Message text 


1461 


5B5 


3 


* 




1464 


588 




OWSTRTGV 


Start of GETVIS 


1468 


5BC 




OWAOAL 


Address of OAL section 


1472 


SCO 




UACBAD 


User's ACB address 


1476 


5C4 




AIXACBAD 


AIX cluster ACB address 


1480 


5C8 




BCACBAD 


Base cluster ACB address 


1484 


5CC 




UPACBAD 


ACB of upgrade member 


1488 


5D0 




US BAD 


Pointer to USB 


1492 


5D4 




OWAUCPT 


Pointer for IKQLAB 


1496 


5D8 


24 


FLRGATTR 


Copyof CTGFLfor "RGATTR" 


1496 


5D8 


16 


* 




1512 


5E8 




* 


Length of "RGATTR" data 


1516 


SEC 




FLRGATRA 


Pointer to "RGATTR" 


1520 


5F0 


24 


FLEXCPEX 


Copy of exception exit CTGFL 


1520 


5F0 


16 


* 




1536 


600 




FLEXCEPL 


Length of exception exit data 


1540 


604 




FLEXCEPA 


Address of EXCPEXIT 


1544 


608 


72 


OWPLSAV3 


Third level save 


1616 


650 


80 


INTCPL 


internal CPL 


1696 


6A0 




RPLPAD 


RPLpool just handled 


1700 


6A4 




PWADDR 


Address of first PLH 


1704 


6A8 




AIXBUFAD 


Upgrade buffer pool 


1708 


6AC 




AIXBUFLN 


Length of upgrade buffer pool 


1712 


6B0 


24 


MSGPARMS 


Parameter list for IKQOCMSG 


1736 


6C8 


2 


MSGFLGBT 


Message flag byte 


1738 


6CA 


2 


NRPL 


Number of user strings 


1740 


6CC 


2 


AIXBCLEN 


GETVIS Jength for ACB/RPL 


1742 


6CE 


2 


UPGRM 


Number of members in upgrade set - 


1744 


6D0 


2 


UPGRCT 


Upgrade set loop counter 


1746 


6D2 


2 


AIXUPLEN 


Length of upgrade set (RPL+PLH) 


1748 


6D4 


.1 

.... \'.'.'. 

1. 

1 


AIXFLG 

AIXUPGR 

AIXBASE 

AIXPE 

AIXPEU 

AIXPATH 

AIXMUS 

AIXEUO 

AIXUSERR 


Alternate index flags 

Upgrade set available 

Base cluster handled 

Path entry handled 

Path entry of upgrade set 

Path structure open 

Member of upgrade set handled 

AIX as end-use object 

Upgrade set error 


1749 


6D5 


.\'.'. ..'.'. 


AIXFLG2 

AIXTHB 

AIXPEUBF 


Alternate index flags 2 

THB is for upgrade set 

One additional index buffer already 

present 

Reserved 



Multi-use field 



OPEN WORK AREA (IKQOPNWA) (...Cont'd) 



Displacement 


Bytes and 


Field Name 


Description 




Dec 


Hex 


Bit Pattern 








1750 


6D6 


1 

1 

. XXX xxxx 


PATHFLG 
PFLUPD 


Path flags, first byte 
Update option 
Reserved 




1751 


6D7 


1 

1... .... 

..1 

...1 .... 
.... 1... 


RESETSW 

ESDSERR 
OALEFND 
JRNACT 
CATOPEN 


Path flags, second byte 

Switch for reset of data set at 

open time 

ESDS error flog 

OAL entry found 

JRNAD active 

Catalog open in progress 

Reserved 




1752 


6D8 


1 


SAVAIX 


Save area for AIXFLG 




1753 


6D9 


2 


AIXUSAV 


Save area for ACB option 




1755 


6DB 


3 


AIXYENTR 


Internal address of Y entry 




1758 


6DE 


3 


AIXDNAM 


AIX data name 




1761 


6E1 


3 


AIXINAM 


AIX index name 




1764 


6E4 


3 


BCDNAM 


Base cluster data name 




1767 


6E7 


3 


BCINAM 


Base cluster index name 




1770 


6EA 


3 


CLUNAME 


Cluster name save area 




1773 


6EE 


8 


NAMEFLD 


USE/RE LSE parameter list 




1781 


6F5 


5 


INTWA 


Internal catalog work area 




1786 


6FA 


512 


OWA2 


Work area 




1786 


6FA 


512 


OWAUCAT 


IKQCAT work area for UCAT 




1786 


6FA 


512 


USCTGWA 


Catalog work area IKQOPNUS 




1786 


6FA 


512 


OWAMSGAR 


Message work area 




2298 


8FA 


4 


OWAEND 


Reserved 




2302 


8FE 


2 


LSRCNT 


Number of Datasets using LSR 




2304 


900 


4 


AUROOT 


Address of first control block 
in allocation unit 




2308 


904 


4 


CPAADR 


Address of channel program area 




2312 


908 


A 


WAIKQSTM 


Address of storage manager modu 


e 



Multi-use field 



PLACEHOLDER (PLH) 



Offset 
Dec 


Hex 


Bytes 


Field Name 


Hex 
Digit 


Description 


Standard Save Area 




4 

8 





4 

8 


72 
4 
4 

4 


PLHSAREA 
PLHSADDR 




Register save area 

Reserved 

Address of user's save 

area 

Reserved 


Buffer Manager Save Area 


12 


C 


60 


PLHSAVE 




Save area for 15 registers 
(Reg. 0-1 4) 


I/O Manager Save Area and JRNAD Extended Save Area 1 


71 

116 
164 


48 

74 
A4 


44 

48 
16 


PLHBSAVE 

PLHIXSSV 
PLHJRNSV 




Buffer manager and I/O 
manager save area 
(Reg.9-14andRegO-4) 

Index search and get next 
save area 
JRNAD save area 


Return Register Stacks 


180 
180 
184 


B4 
B4 
B8 


8 
4 
4 


PLHSTCK 
PLHSTCKl 
PLHSTCK2 




Fixed return register stack 
Return register from level 1 
Return register from level 2 


RPL Pointers 


188 
192 


BC 
CO 


4 
4 


PLHHRPL 
PLHCRPL 




Pointer to header RPL 
Pointer to current RPL 


PLH ECB 1 


196 
196 
197 
198 

199 


C4 
C4 
C5 
C6 

C7 


4 
1 

1 
1 

1 


PLHECB 

PLHAUSE 
PLHECOM 
PLHEWAIT 
PLHECBT 


X'80' 


Event control block 

Reserved 

Request active on PLH 

Communications byte 

Wait flag on ECB 

Test and set byte for ECB 


PLH Work Area 1 


200 


C8 


44 


PLHWAREA 




PLH work area 


PLH Identification Byte 


244 


F4 


1 


PLHID 


X'55' 


PLH identification byte 


PLH Use Gate | 


245 


F5 


1 


PLHUSE 




PLH use gate 



Pl^gHOLDER (PLH) (. . . Continued) 





Offset 


Bytes 


Field Name 


Hex 


Description 




Dec Hex 






Digit 




i 


PLH Condition 


Flags 






246 F6 


1 


PLHFLAG 




PLH condition flags 








PLHST 


X'80' 


PLH status flag (bit 0) 
1 - PLH set 
- PLH invalid 








PLHPOS 


X'40' 


PLH position flag (bit 1) 
1 - Next record 
- previous record 








PLHEOD 


X'20' 


PLH end-of-date-condition 

flag (bit 2) 

1 - EOD reached 

- Not EOD 








PLHWAIT 


X'10' 


PLH wait flag (bit 3) 
1 - I/O pending 
- No I/O pending 








PLHSKIP 


X'08' 


PLH skip flag (bit 4) 
1 -Skip control interval 
- Don't skip control 
interval 








PLHRST 


X'04' 


PLH restart flag (bit 5) 
1 - Restart 
- No restart 








PLHFST 


X'02' 


PLH first-time flag (bit 6) 

1 - First time 

2 - Not first time 








PLHRREAD 


X'OV 


PLH exclusive control 
reread flag (bit 7) 
1 - Need reread 
- Reread not needed 




247 F7 


1 


PLHFLG 




PLH spare condition flag 




PLH Communic 


ation Switche 






248 F8 


1 


PLHSWITCH 




PLH communication switches 








PLHLOAD 


X'80' 


PLH load or resume load 
indicator 








PLHKRCH 


X'40' 


PLH key range change 
indicator 








PLHMSRT 


X'20' 


Mass insert indicator 








PLHFSR 


XMO- 


First request for data set 
indicator 








PLHSTBCB 


X'04' 


Demand a BCB from 
STEALOOO (IKQBFAOO) 








PLHEC 


X"02' 


Exclusive control needed 



PLACEHOLDER (PLH) (. . .Continued) 



Offset 




Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 




Previous Request Characteristics 


249 


F9 


3 


PLHPREO 




Previous request information 


249 


F9 


1 


PLHRTC 




Previous request-type code 


250 


FA 


2 


PLHOPT 




Previous request option bytes 


250 


FA 


1 


PLHOPTl 




First option byte 


251 


FB 


1 


PLHOPT2 




Second option byte 


252 


FC 


4 


PLHPKEYA 




Pointer to save area for keyed 








Internal reques 


t characteristics for LSR | 


256 


100 


4 


PLHILTM 




Test mask for WRTBFR 


260 


104 


4 


PLHILRM 




Reset mask for WRTBFR 


264 


108 


1 


PLHPFRC 




Percentage value for number 
of least recently used buffers 


265 


109 


1 


PLHIOPTI 




Option byte for WRTBFR 








PLHIDSC 


X80 


Data set processing for 
forced close 








PLHIDS 


X40 


Write buffers for a data set 








PLHILRU 


X20 


Write least recently used 
buffers 








PLHIALL 


XIO 


Write all buffers 








PLHITRN 


X08 


Write buffers for specified 
transaction identifier 








PLHIBCB 


X04 


Subpool contains at least 
one modified buffer 








PLHIFIO 


X02 


Force I/O for buffer 


266 


lOA 


2 






Reserved 


268 


IOC 


4 


PLHDBSPH 




Address of data buffer 
subpool 


272 


110 


4 


PLHIBSPH 




Address of incex buffer 
subpool 


276 


114 


4 


PLHACB 




Pointer to data set's ACB 


280 


118 


4 


PLHEACB 




Address of ACB of buffer 
with error 


284 


lie 


4 


PLHLSRA 




Address of LSR save area 








Multiple String 


Support 




288 


120 


1 


PLHSTRID 




PLH string ID (1-255) 


289 


121 


1 


PLHENDRQ 




ENDREQ request gate byte 


290 


122 


1 


PLHINDS 




Indicator byte 








PLHCLOSE 


X'80' 


Close-type ENDREQ request 


291 


123 


' 






Reserved 


EXCPAD Parameter List Pointer ] 


292 


124 


4 


PLHPARML 




EXCPAD parameter list 








JRNAD Parame 


ter List Point€ 


r 


296 


128 


4 


PLHAJRN 




JRNAD paramo ter list 
pointer 



PLAaHOLDER (PLH) (. . .Continued) 



Offset 




Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 










I/O Manager E 


ntry Point 




300 


12C 


4 


PLHIOMGR 




I/O Manager (IKQIOAOO) 
entry point 








Key Range Sup 


port Fields 




304 


130 


4 


PLHDCRDB 




Address current ARDB 


308 


134 


4 


PLHDTRDB 




Address target ARDB 


Pointers to Buffer Headers (BHDs) 


312 


138 


4 


PLHDBHD 




Address of data BHD 


316 


13C 


4 


PLHIBHD 




Address of index BHD 


320 


140 


4 


PLHBRPL 




Save header RPL 


324 


144 


4 


PLHTHB 




Address of THB (share 
option 4) 


328 


148 


4 






Reserved 


Data PLH | 


332 


14C 


36 


PLHDATA 




Data PLH 


332 


14C 


20 


PLHDCNV 




Data CNV information 


332 


14C 


4 


PLHDRBA 




Data CNV RBA 


336 


150 


8 


PLHDBUF 




Data buffer description 


336 


150 


4 


PLHDBCB 




Address of data BCB 


340 


154 


4 


PLHDBAD 




Address of data buffer 


344 


158 


4 


PLHCIDF 




Data CNV CIDF 


344 


158 


2 


PLHDFSO 




Data CNV free space offset 


346 


15A 


2 


PLHDFSL 




Data CNV free space length 


348 


15C 


1 


PLHDSW 




Data CNV switches 








PLH HOLD 


X'80' 


Track hold indication 








PLH HELD 


X'40- 


Track free indication 








PLHNORD 


X'lO' 


No read indication 








PLHLOG 


X'08' 


Logical GETBUFF request 








PLHRAHD 


X'04' 


Read-ahead request 


349 


15D 


1 


PLHDSWl 




Buffer request control switch 








PLHEHOLD 


X'80' 


Exclusive control desired 








PLHEHELD 


X'40' 


Exclusive control held 








PLHEACTV 


X'20" 


Exclusive control active 








PLHCATH 


X'lO' 


CA SPLIT Track hold 








PLHCATF 


X-08' 


CA SPLIT Track free 








PLHDIRQ 


X'04' 


Indication to the buffer manag- 
er that this direct write request 
is to be deferred (set and reset 
by IKQMDY) 


350 


15E 


2 


PLHDCSZ 




Data CNV size 10 
(rightmost RDF) 








Data Record D« 


ascription 




352 


160 


16 


PLHDRCD 




Data record description 


352 


160 


2 


PLHDRO 




Data record offset 


354 


162 


2 


PLHDRDF 




Data record RDF-offset 


356 


164 


2 


PLHDRiX 




Data record RDF-index 



PLACEHOLDER (PLH) (. . .Confinued) 



Offset 




Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 




358 


166 


2 






Spare 


360 


168 


4 


PLHDRRBA 




Data record RBA 


364 


16C 


4 


PLHDRL 




Data record length 


Read -Ahead Data PLH | 


368 


170 


24 


PLHBDATA 




Data read ahead PLH 


368 


170 


4 


PLHBRBA 




RBA of next CNV to read 
ahead 


Read-Ahead Data CNV Description 1 


372 


174 


20 


PLHBDCNV 




Read-ahead data CNV 
information 


372 


174 


4 


PLHBDRBA 




Data CNV RBA 


376 


178 


8 


PLHBDBUF 




Data buffer description 


376 


178 


4 


PLHBDBCB 




Address of data BCB 


380 


17C 


4 


PLHBDBAD 




Address of data buffer 


384 


IRQ 


4 


PLHBDCDF 




Data CNV CIDF 


384 


180 


2 


PLHBDFSO 




Data CNV free space offset 


386 


182 


2 


PLHBDFSL 




Data CNV free space length 


388 


184 


1 


PLHBDSW 




Data CNV switches 


389 


185 


1 


PLHBDSWl 




Buffer request control switch 


390 


186 


2 


PLHBDCSZ 




Data CNV size-10 








Alternate Index Record Infor 


nation 


392 


188 


16 


PLHAIX 




A IX record information 


392 


188 


4 


PLHAIXPT 




Address of base cluster 
pointer 


396 


18C 


4 


PLHAIXWA 




Pointer to work areb 


400 


190 


4 


PLHAIXWL 




Reserved 


404 


194 


2 


PLHAIXPN 




Counter of base cluster 
pointer 


406 


196 


2 


PLHAIXOP 




RPL Option bytes 


408 


198 


12 


PLHUPG 




Upgrade set information 


408 


198 


4 


PLHUPGPl 




Current USB entry address 


412 


19C 


4 


PLHUPGP2 




Last USB entry address 


416 


lAO 


4 


PLHUPGAD 




Address of prime key 
(KSDS) or RBA (ESDS) of 
base cluster record 


420 


1A4 


24 


PLHAIXSV 




A IX save area 


Spanned Record Flag Byte 


444 


IBC 


1 


PLHSWr2 




Spanned record switch byte 








PLHSPAN 


X'80" 


Spanned record indicator 








PLHSRU 


X'40' 


Called from IKQSRU 








PLHSRUF 


X'20' 


First call from IKQSRU 








PLHSRUL 


X'lC 


Last call from IKQSRU 








PLHSRCAS 


X'08' 
X'04' 


CA-split necessary 
Reserved 








PLHSREC 


X'02' 

x'or 


Exclusive control indicator 
Reserved 



P LACE HO LDER(PLH) (...Continued) 



Offset 




Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 




JRNAD Flag Byte 


445 


IBD 


1 


PLHJRN 




JRNAD flag byte 








PLHJRACT 


X'80' 


JRNAD exit active 








PLHJRVSM 


X'40' 


JRNAD called from 
IKQVSM 








PLHJRMDY 


X'20' 


JRNAD called from 
IKQMDY 








PLHJRCIS 


X'lO' 


JRNAD called from IKQCIS 








PLHJRCAl 


X'08' 


JRNAD first call from 
IKQCAS 








PLHJRCA2 


X'04' 


JRNAD second call from 
IKQCAS 








PLHJRSRG 


X'02' 


JRNAD called from 
IKQSRG 








PLHJRSRU 


X'Ol' 


JRNAD called from 
IKQSRU 


Spanned Record information 


446 


1BE 


2 


PLHSRCNT 




Number of segments 


448 


ICO 


22 


PLHSPREC 




Spanned record information 


448 


ICO 


8 


PLHRCD 




Spanned record description 


448 


ICO 


4 


PLHAREA 




Pointer to user area 


452 


1C4 


4 


PLHRLEN 




Length of spanned record 


456 


1C8 


4 


PLHSRRBA 




RBA of record 


460 


ICC 


2 


PLHXIEO 




Index entry offset of l.port 


462 


ICE 


2 


PLHXPTR 




Pointer number 


464 


IDO 


6 


PLHSRRDF 




Double RBF for spanned 
record 


464 


IDO 


1 


PLHSRR2 




R byte 2 


465 


IDl 


2 


PLHSRLVL 




Level number 


467 


1D3 


1 


PLHSSRl 




R byte 1 


Additional PLH Switches 


468 


1D4 


2 


PLHSRLL 




Length of segment 


470 


1D6 


1 


PLHSWTl 




PLH communication switch 
control 








PLHRSI 


X'10» 


RPL area switch indicator 
(indicates that the user RPL 
areas of an AIX and the 
base cluster have been 
switched) 








PLHUPRES 


X'08' 


AIX upgrade reset switch 








PLHPCI 


X'04' 


Previous control interval 








PLHBWD 


X'02' 


0=Forward, l=backward 








PLHLRD 


X'Ol' 


0=any record, l = last record 


471 


1D7 


1 


PLHFLGl 


X'80' 
X'40' 
X'20' 
XMO' 


Flag byte continuation 

Reserved 

Reserved 

Reserved 

Reserved 



PLACEHOLDER <PLH) (...Continued) 



Offset 




Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 










PLHDUKEY 


X'08' 


Duplicate key in AIX record 








PLHAIXRP 


X'04' 
X'02' 
X'02' 


AIX repositioning flag 

Reserved 

Reserved 






Index PLH 




472 


1D8 


40 


PLHINDEX 
PLHLESDS 




Index PLH 

Length of PLH for ESDS 


Index CNV Description 


472 


1D8 


20 


PLHXCNV 




Index CNV information 


472 


1D8 


4 


PLHXRBA 




Index CNV RBA 


476 


IDC 


8 


PLHXBUF 




Index buffer description 


476 


IDC 


4 


PLHXBCB 




Address of index BCB 


480 


lEO 


4 


PLHXBAD 




Address of index buffer 


484 


1E4 


4 


PLHXCIDF 




Index CNV CIDF 


484 


1E4 


2 


PLHXFSO 




Index CNV free space 
offset 


486 


1E6 


2 


PLHXFSL 




Index CNV free space length 


488 


1E8 


1 


PLHXSW 




Index CNV switches 


489 


1E9 


1 


PLHXSWl 




Buffer request control 


490 


lEA 


^ 


PLHXCSZ 




Index CNVsize-10 


Index Entry Description 


492 


lEC 


20 


PLHXETRY 




Index entry description 


492 


lEC 


2 


PLHXEO 




Index entry offset 


494 


lEE 


2 


PLHXSEO 




Next section entry offset 


496 


IFO 


4 


PLHXSOP 




Last section entry offset 
pointer 


500 


1F4 


2 


PLHXLVL 




Present index level in 
process 


502 


1F6 


2 


PLHXLEVP 




Previous level index 


504 


IFB 




PLHXPTRP 




Previous entry-s p-field 


504 


1F8 


2 


PLHXEOP 




Previous entry offset 


506 


IFA 


2 


PLHXSEOP 




Previous section entry 
offset 


508 


IFC 


' 


PLHXRBAP 




Previous index record RBA 


Read-Ahead Index PLH 


512 


200 


28 


PLHBINDX 




Read-ahead index PLH 



PLACEHOLDER (PLH) (...Continued) 



Offset 




Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 




Read-Ahead Index CNV Description 


512 


200 


20 


PLHBXCNV 




Read-ahead index CNV 
information 


512 


200 


4 


PLHBXRBA 




Index CNV RBA 


516 


204 


8 


PLHBXBUF 




Index buffer description 


516 


204 


4 


PLHBXBCB 




Address of index BCB 


520 


208 


4 


PLHBXBAD 




Address of index buffer 


524 


20C 


4 


PLHBXCDF 




Index CNV CIDF 


524 


20C 


2 


PLHBXFSO 




Index CNV free space offset 


526 


20E 


2 


PLHBXFSL 




Index CNV free space length 


528 


210 


1 


PLHBXSW 




Index CNV switches 


529 


211 


1 


PLHBXSWl 




Buffer request control switch 


530 


212 


2 


PLHBXCSZ 




Index CNV size-10 








Read-Ahead Index Entry Des 


cription 


532 


214 


2 


PLHBXEO 




Index entry offset 


534 


216 


2 


PLHBXSEO 




Next section entry offset 


536 


218 


4 


PLHBXSOP 




Last section entry offset 
pointer 








Previous Record Key Informa 


tion 


540 


21C 


* 


PLHPKEY 
PLHLKSDS 




Key of previous record 
Basic length of PLH for 
KSDS 



* Variable, equal to keylength 



RESOURCE POOL HEADER (RPHD) 



Offset 
Dec Hex 


Bytes 


Field Name 


Hex. 
Digit 


Description 



2 2 

4 4 
6 6 


2 
2 

2 
2 


RPHDASTR 
RPHDMSTR 

RPHDSTNO 




Number of active strings 

Maximum number of strings 

ever simultaneously active 

Reserved 

Total number of PLHs in the 

resource pool 



REQUEST PARAMETER LIST (RPL) 



Offset 




Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 










1 


RPLID 


. 


Control block identifier= 
X'OO' 



1 



1 


1 
1 


RPLIDD 
RPLSTYP 


X'OO' 


RPL equate 
Release Indicator 
X'OO' VSAM Release 1 
X'lO' VSAM Release 2 
X'20' VTAM 


2 


2 


2 


RPLLEN 




Length of RPL 


4 


4 


4 


RPLRBA 




RBA of last record processed 


4 


4 


4 


RPLDDDD 




DD field 


8 


8 


4 


RPLARG 




Pointer to search argument 


12 


C 


8 


RPLRCD 




Record description 


12 


C 


4 


RPLAREA 




Address of the caller's 
work area 


16 


10 


4 


RPLRLEN 




Length of record 


20 


14 


4 


RPLBUFL 




User buffer size 


24 


18 


4 


RPLACB 




Address of the caller's ACB 


24 


18 


4 


RPLDACB 




Catalog compatibility 


28 


IC 


1 


RPLSTRID 




RPL string identifier 


29 


ID 


1 


RPLREQ 




Request type 








RPLPOINT 


X'OO' 


POINT request 








RPLGET 


X'04' 


GET request 








RPLERASE 


X'OS' 


ERASE request 




, 


RPLPUT 


X'OC 


PUT request 








RPLUPDTE 


X'OC 


Update request 








RPLINSRT 


X'lO' 


Insert request 








RPLCHECK 


X'14' 


Check request 








RPLRCLSE 


X'18' 


RCLOSE request 








RPLENDRQ 


X'lC 


ENDREQ request 








RPLFRCIO 


X'lC 


FORCIO request 








RPLVERFY 


X'20' 


VERIFY request 








RPLPUTL 


X'24' 


PUT locate request 








RPLWRBFR 


X'2C 


Write Buffer Request 


30 


IE 


2 


RPLKEYL 




Key length 


32 


20 


2 


RPLOPTCD 




Option codes 


32 


20 


1 


RPLOPTl 




First byte of options 








RPLKEY 


X'80' 


Keyed access 








RPLADR 


X'40' 


Addressed access 








RPLSEQ 


X'20' 


Sequential 








RPLDIR 


X'lO' 


Direct processing 








RPLASY 


X'08' 


Asynchronous 








RPLSKP 


X'04' 


Skip sequential access 








RPLCNV 


X'02' 


CNV access (RBA) 








RPLUPD 


X'Ol' 


Update 


33 


21 


1 


RPLOPT2 




Second byte of options 








RPLKGE 


X'80' 


Search key greater than or 
equal 






RPLGEN 


X'40' 


Generic key request 








RPLNSP 


X'20' 


Note string position 








RPLNUP 


X'lO' 


No update 








RPLLOC 


X'08' 


Locate mode 








RPLUBF 


X'04' 


User buffers 








RPLBWD 


X'02' 


0=Forwards, l=backwards 








RPLLRD 


X'Ol' 


0=Any record, l=Last record 



REQUEST PARAMATER LIST (RPL) (. . .Confinued) 



Offsef ' 


Bytes 


Field Nome 


Hex 


Description 


Dec Hex 






Digit 




34 22 


1 


RPLHLD2 


X'FF' 
X'OO' 


Second test and set byte 
(RPL not available) 
RPL available 


35 23 


1 


RPLHLD 


X'FF' 
X'OO' 


Test and set byte (RPL he Id- 
request not completed) 
Request completed 


36 24 


1 


RPIPLAG 




Flag byte 






RPLECBPR 


X'80' 


CMS ECB Indicator 


37 25 


3 


RPLPDBK 




Error feedback area 


37 25 


1 


RPLFDBl 




Error class (return) code 


37 25 


1 


RPLRTNCD 




Error class code 


38 26 


1 


RPLFDB2 




Function type code 


39 27 


1 


RPLFDB3 




Error type code 


39 27 


1 


RPLERRCD 




Error type code 


39 27 


1 


RPLFDBKC 




Error type code 


Register 15 setting for error feedback code (Stc 


jres in RPLRTNCD) [Offset X'253 






RPLNOERR 


X'OO' 


No error detected 






RPLNORPL 


X'04' 


RPL held by another request 






RPLLOGER 


X'08' 


Logical error 






RPLPHYER 


X'OC 


Physical error 


Register 15 setting for function type code (Sto 


ed in RPLF 


DB2) Offset X*26' 






RPLFUPG 


X'04' 


UPGRADE Processing 






RPLFAFX 


X'02' 


AIX Processing 






RPLFINC 


_X'01' 


UPGRADE Set is incorrect 


Returns that are not errors (Register 15 = X'OO') 


The following equates are for the various feed 


jack return 


5 that may be set for offset 


39 (27), They fall into the four categories sho 


//n. 








RPLEOV 


X'04' 


EOV called during request 






RPLDPKEY 


X'08' 


Duplicate key 






RPLNEWCA 


X'lO' 


Index FULL-CA SPLIT Reserved 


Logical errors (register 15 = X'08') 1 






RPLEOFDS 


X'04' 


End of data set encountered 






RPLEODER 


X'04' 


End of data set encountered 






RPLDUPRC 


X'08' 


Duplicate record 






RPLDUP 


X'08' 


Duplicate record 






RPLSEQCK 


X'OC 


Sequence error 






RPLNRFND 


X'lO' 


No record found 






RPLNOREC 


X'lO' 


No record found 






RPLEXCTL 


X'14' 


Data already in exclusive 
control 






RPLNVOLM 


X'18' 


Volume or extent 
unavailable 






RPLNRSPA 


X'lC 


No DASD space available 






RPLNOEXT 


X'lC 


No DASD space available 






RPLSPACE 


X'lC 


No DASD space available 






RPLINRBA 


X'20' 


Invalid RBA specified 






RPLNKEYR 


X'24' 


No key range for new record 






RPLNOVIR 


X'28' 


Insufficietit virtual storage 



REQUEST PARAMETER LIST (RPL) (. . .Continued) 



Offset 


Bytes 


Field Name 


Hex 


Description 


Dec Hex 






Digit 








RPLWRKAS 


X'2C' 


User's work area not large 
enough 






RPLCDLOD 


X'30' 


CD LOAD failure 






RPLVLERR 


X'34' 


Internal VSAM logic error 






RPLNOPLH 


X'40' 


PLH in use (no string 
available) 






RPLNOPEN 


X'44' 


Access type not requested 
at Open 






RPLKEYES 


X'48' 


Keyed request for ESDS 






RPLADRKS 


X'4C' 


ADR or CNV insert for 
KSDS 






RPLINERS 


X'50' 


Illegal ERSAER request 






RPLINLOC 


X'54' 


Illegal locate mode 
specification 






RPLNOPOS 


X'58' 


Positioning error 






RPLNGUPD 


X'5C' 


No valid GETUPD issued 






RPLUPDKC 


X'60' 


Key change during update 






RPLLENCN 


X'64' 


Length change for addressed 
update 






RPLCONOP 


X'68' 


Improper or conflicting 
RPL options 






RPLIMRCL 


X'6C' 


Improper RECL£N specified 






RPLIMGKL 


X'70' 


Improper generic key length 
specified 






RPLINLD 


X'74' 


Illegal request during data 
set load 






RPLCATLG 


X'80' 


Internal catalog call 
failure 






RPLSRLOC 


X'84' 


Illegal locate mode 






RPLSRADR 


X'88' 


Illegal request for spanned 
record 






RPLINCSR 


X'8C' 


Inconsistent spanned record 






RPLNOBAS 


X'90' 


No base record 






RPLMAXPT 


X'94' 


Maximum of pointers 
exceeded 






RPLINVRR 


X'CO' 


Invalid relative record 
number 






RPLRRADR 


X'C4' 


Illegal address requested 
(RRDS) 






RPLIPATH 


X'C8' 


Illegal path access 




J 


RPLINBWD 


X'CC 


Illegal backward mode 
requested 


Physical errors (register 15 = X'OC 






RPLRDERD 


X'04' 


Data read error 






RPLRDERI 


X'08' 


Index read error 






RPLRDERS 


X'OC 


Sequence set read error 






RPLWTERD 


X'lO' 


Data write error 






RPLWTERI 


X'14' 


Index write error 






RPLWTERS 


X'18' 


Sequence set write error 



REQUEST PARAAMTER LIST (RPL) (. . . Continued) 



Offset 




Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 




40 


28 


4 


RPLCHAIN 




Pointer to next RPL 


44 


2C 


1 


RPLAIXID 


X'80' 
X'40' 
X'20' 
X'lO' 
X'08' 
X'04' 
X'02' 


AIX information byte 

Reserved 

Reserved 

Reserved 

Reserved 

Reserved 

Reserved 

Reserved 








RPLAXPKP 


X'Ol' 


Prime key pointer 


45 


2D 


1 






Reserved 


46 


2E 


2 


RPLAIXPC 




Number of base cluster 
pointer in the AIX record 


48 


30 


1 


RPLXID 




Transaction ID 


49 


31 


3 






Reserved 



RESOURCE SHARING CONTROL BLOCK (RSCB) 





Offsef 






Hex. 




Dec 


Hex 


Bytes 


Field Name 


Digit 


Description 








4 


RSCBRBA 




RBA to be held in exclusive 
control 


4 


4 


7 


RSCBDSID 




Data set identifier 


4 


4 


4 


RSCBCAT 




Catalog ACB pointer 


8 


8 


3 


RSCBDSCI 




CI number of data set 
component 


11 


b 


1 


RSCBCSID 




ID of string using field 
RSCBGATE (for a control 
area split) 


12 


C 


4 


RSCBECB 




ECB used by IKQBFA and 
IKQCAS 


12 


C 


1 






Reserved 


13 


D 


1 


RSCBSTID 




ID of string (set by IKQBFA) 


14 


E 


1 


RSCBCOM 




Communication byte 








RSCBWAIT 


XW 


Wait flag 


15 


F 


1 


RSCBGATE 




Exclusive control byte: 

XW=ECB is free 
X'FF'=ECBisinuse 



TRACK HOLD BLOCK (THB) 



Displacement 


Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 





1 




1 


1 

1 


THBID 
THBFLAG 


X'88' 


Control block identification 
Flag byte 








THBAaV 


X'80' 


This THB is active 








THBPSUDO 


X'40' 


Track hold not issued 








THB REAL 


X'20' 


Track hold issued 


2 


2 


2 


THBLEN 




Length of THB 


4 


4 


2 






Available 


6 


6 


2 


THBTID 




Task ID 


8 


8 


16 


THBCCB 




CCB area 


24 


18 


8 


THBCCW 




CCW area 


24 


18 


1 


THBCCWOP 




CCW operation code 


25 


19 


3 


THBCCWAD 




CCW argument address 


28 


IC 


1 






CCWFLAGS 


29 


ID 


1 






Unused 


30 


IE 


2 


THBCCWa 




CCW byte count 


32 


20 


20 


THBIODRB 




ODRB area 


32 


20 


4 






Available 


36 


24 


8 


THBARG 




MBBCCHHR 


44 


2C 


4 






RBA to be held 


48 


30 


4 






Unused 


52 


34 


48 


THB SAVE 




Save area for 12 registers 


100 


64 


4 


THBNTHB 




Address of next THP 



UPGRADE SET BLOCK (USB) 



Offset 




Bytes 


Field Name 


Hex 


Description 


Dec 


Hex 






Digit 










1 


USB ID 




USB identifier 








USBIDD 


X'EO- 


USB equate 


1 


1 


1 


USBACT 




Active byte, test and set 


2 


2 


2 


USBLEN 




Length of this block 


4 


4 


2 


USBMAXDB 




Max .data buffer in upgrade 
set 


6 


6 


2 


USBMAXIB 




Max. index buffer in 
upgrade set 


8 


8 


4 


USBWAPTR 




Pointer to work area pool 


12 


C 


2 


USBMIN 




Min. required record length 


14 


E 


2 


USBWALEN 




Work area length 


16 


10 


4 


USBPLH 




Pointer to common USB PLH 








Begin of first/c 


3nly Index 


Entry 


32 


20 





USBAIX 






32 


20 


4 


USBACB 




Pointer to ACB 








USB LAST 


X'80' 


Lost entry indicator 


36 


24 


2 


USBRKP 




Relative key position 


38 


26 


2 


USBKL 




Key length 








Next Alternate 


Index Ent 


y 


40 


28 


VARIABLE 








20 


14 


4 


USBRPL 




Pointer to RPL 


24 


18 


4 


USBDBHD 




Pointer to data buffer 
header 


28 


IC 


4 


USBIBHD 




Pointer to index buffer 
header 



I 



VSAM SHARED RESOURCE TABLE (VSRT), 





Offset 






Hex. 




Dec 


He>f 


Bytes 


Field Name 


Digit 


Description 




1 




1 


1 
1 


VSRTBKID 


X'15' 


Control block identifier 
Reserved 


2 


2 


2 


VSRTLEN 




Length of VSRT 


4 


4 


4 


VSRTID 




Control block name VSRT 


8 


8 


4 






Reserved 


12 


C 


1 


VSRTFLGl 




Flag byte 1 








LSR 


X'40' 


LSR pool indicator 


13 


D 


1 


VSRTFLG2 




Flag byte 2 


14 


E 


2 


VSRTUNCT 




Number of data sets opened 
with the LSR option 


16 


10 


4 


VSRTECB 




ECB for the VSRT 


18 


12 


1 


VSRTCOM 




Communication byte 








VSRTWAIT 


X'80' 


Wait flag 


19 


13 


1 


VSRTGATE 




Exclusive control gate: 
X t0» = ECB is free 
X^F* = ECB is in use 


20 


14 


4 


VSRTRP 




Address of the control block 
part of the resource section 
of the VRP 


24 


18 


4 


VSRTRLEN 




Length of the control block part- 


28 


IC 


4 


VSRTPLHA 




Address of the PLH spool in the 
resource section 


32 


20 


1 


VSRTSTRN 




Total number of PLHs required 
for all data sets sharing the 
resource pool 


33 


21 


1 


VSRTKL 




Maximum keylength of the data 
sets sharing the resource pool 


34 


22 


2 


VSRTPLHL 




Length of each PLH in the 
PLH pool 


36 


24 


4 


VSRTSCB 




Address of the RSCB 


40 


28 


4 


VSRTBUFH 




Address of buffer pool 


44 


2C 


4 


VSRTISTB 




Address of first buffer 


48 


30 


4 


VSRTMBSZ 




Maximum buffer size in buffer 
pool 


52 


34 


2 


VSRTSPNO 




Number of subpools in buffer 
pool 


54 


36 


2 


VSRTBFNO 




Number of buffers in buffer 
pool 


56 


38 


4 


V5RTBFLN 




Length of the buffer part of the 
resource section 


60 


3C 


4 


VSRTCPAH 




Address of the channel program 
area pool in the resource section 


64 


40 


4 


VSRTCPAL 




Length of the channel program 
area'pool 


68 


44 


4 


VSRTTHBA 




Address of the THE poo! 


72 


48 


4 


VSRTTHBL 




Length of the THB pool 



SERVICE AIDS 

Service aid phases are available for : 

Enabling and disabling snap dumps within the VSAM component. 

Obtaining snap dumps of control blocks . 

Using UPSI to obtain diagnostic information for the VSAM catalog. 

Maintaining DSCBs in the VTOC and VOLl labels on DASD. 

Loading a VSAM phase or a program you have written. 

The service aid phases IKQVDUMP and $SBCVS03 are included in the link -edit 
of VSAM. The other three phases, IKQVEDA, IKQVDU, and $$BCVS04 can be 
placed in the core image library by executing the following job. 

//JOB JOBNAME 

//OPTION CATAL 

INCLUDE IKQCLNLK 
/* 

//EXEC LNKEDT, REAL 
/& 

Enabling and Disabling Snap Dumps 



The following snap points are available in VSAM. Each snap ID, if enabled with 
IKQVEDA, will produce the result indicated. 

Snap number Result of Enabling this Snap 

0001 This snap allows Catalog Management diagnostic information to be 
obtained. (See section'Using UPSI to dbtain Diagnostic Information 
for the VSAM Catalog ' for details.) 

As snap 0001 uses the UPSI byte, it cannot be run when the user 
program in the partition also uses the UPSI byte. 

0002 This snap enables the Buffer Manager trace, which provides the 
current usage of VSAM buffering. 

0003 This snap enables the CLOSE control block dump at the beginning 
of CLOSE processing. 

0004 This snap enables the VSAM I/O trace facility. 

0005 This snap enables the I/O error trace. 

0006 This snap enables the OPEN control block dump facility when open 
processing is complete. 

0007 This snap enables the OPEN error trace. Control blocks are printed 
if an error occurs during open processing. 

0008 This snap enables the Catalog Management I/O trace. All I/O 
operations done by catalog management are printed on SYSLST. 

0009 This snap enables the VSAM Record Management error handler trace, 
allowing display of control blocks for any error detected by VSAM 
record management. 



I 



SERVICE AIDS (. . . Continued) 

Enabling and Disabling Snap Dumps ( Continued) 

IKQVEDA is called by: 

//EXEC IKQVEDA 
The routine will print on SYSLOG : 

ENTER FUNCTION ENABLE/DISABLE/END 

You must enter either : 

ENABLE SNAP = xxxx 

(where xxxx is one of the snap numbers) 

or 

DISABLE SNAP = xxxx 
or 

END (to terminate processing). 
The program will look for a private core image library and print: 

NO PRIVATE CORE lAMGE LIBRARY ASSIGNED 

if it cannot be found and will than look in the core image library for the 
VSAM phase needed. 

If the phase needed cannot be found in a library the program will inform 
you with the following message : 

PHASE NOT FOUND IN THE SYSTEM PRIVATE 
CORE IMAGE LIBRARY 

Any error in input will result in the INVALID REPLY message and the 
ENTER FUNCTION message is reissued. 

The program can only be ended by the END reply as noted earlier. 

The following examples illustrate the use of IKQVEDA to enable and disable 
SNAP 0001: 

// EXEC IKQVEDA 

ENTER FUNaiON ENABLE/DISABLE/END 

ENABLE SNAP =0001 

NO PRIVATE CORE IMAGE LIBRARY ASSIGNED 

SNAP 0001 ENABLED 

ENTER FUNaiON ENABLE/DISABLE/END 

DISBALE SNAP = 0001 

NO PRIVATE CORE IMAGE LIBRARY ASSIGNED 

SNAP 0001 DISABLED 

ENTER FUNCTION ENABLE/DISABLE/END 

END 



SERVICE AIDS (...Continued) 



Obtaining Snap Dumps of Control Blocks 

IKQVDUMP enables you to print out snap dumps of record management and catalog 
control blocks. Code is provided at certain points in VSAM modules which is 
nonoperational so far as normal execution of the modules is concerned. Refer to 
'Enabling and Disabling Snap Dumps'. 

IKQVDUMP is called by the following sequence of instructions (See also 'Loading 
a VSAM phase or a Program You Have Written') : 



LA 
SVC 



1, PARMLIST 



PARMLIST DC CLS'SSBCVSOS' B transient 

DC CLS'IKQVDUMP' phase that provides dump of 

control blocks 

When the program has completed processing, $SBCVS03 returns the program to the 
instruction immediately following the SVC instruction. 



Figure below shows the description and format of the parameter list that follows 
the two phase names in the above calling sequence. 



Offset 


Bytes and 


Field Name 


Description 


Dec Hex 


Bit Pattern 











PARMSWl 


First byte of parameter list 






PARMAMBL 


Dump the AMBL 




.1. 




PARMACB 


Dump the ACB 






.1 




PARMAMDS 


Dump the AMDSB 










PARMARDB 


Dump the ARDB 










PARMBCB 


Dump the BCB 










PARMBUFE 


Dump the buffer 








..1. 


PARMEDB 


Dump the EDB 








...1 


PARMLPMB 


Dump the LPMB 


1 1 






PARMSW2 


Second byte of parameter list 








PARMCCW 


D'ump the CCW 




.1. 




PARMPLH 


Dump the PLH 






.1 




PARMBHD 


Dump the BHD 










PARMRPL 


Dump the RPL 










PARMEXCP 


Dump the EXCPAD work area 










PARMCAT 


Dump the catalog blocks 








..1. 


PARMDATA 


Dump the non-catalog blocks 








...1 


PARMTHB 


Dump the THB 


2 2 


.1. 


A.'. 

..1. 
...1 


PARMSW3 

PARMOPEN 

PARMCLOS 

PARMCIW 

PARMVLST 

PARMREGS 

PARMCECL 

PARMODLB 
PARMREQR 


Third byte of parameter list 

Dump the open work area 

Dump the close work area 

Dump the control interval split area 

Dump the volume list 

Dump the registers 

Dump the control interval exclusive 

control list 

Dump the open DLBL 

Dump the requester's registers 



SERVICE AIDS (. . .Confinued) 

Obtaining Snap Dumps of Control Blocks (. . .Continued) 



Offset 


Bytes and 


Field Name 


Description 


Dec Hex 


Bit Pattern 






3 3 


1 


PARAASW4 


Fourth byte of parameter list 




1 


PARMPAMB 


l=Pointer to start dump is in parameter 

list (PARMAMBA) 

0=Pointer to start dump is in register 1 1 




••' 


PARMCCAA 


l=Pointer to CCA 
0=Pointer to AMBL 




...1 .... 


PARMRTNA 


Coll the test routine 




.... 1... 


PARMHDID 


Dump the header ID 




.X.. .XXX 




Available 


4 4 


4 


PARMAMBA 


Pointer to start dump 


8 8 


4 


PARMID 


Pointer to header 


8 8 


1 


PARMIDLN 


Length of the header 


9 9 


3 


PARMIDAD 


Address of the ID 


12 C 


1 


PARMSW5 


Fifth byte of parameter list 




1 


PARMCCA 


Dump the CCA 




.1 


PARMCADL 


Dump the CCA DLBL 




..1 


PARMCADP 


Dump the CCA DADSM parameter list 






PARMCARA 


Dump the CCA record areas 




.... 1... 


PARMCPL 


Dump the catalog parameter list 
(aCPL) 






PARMPLDN 


Dump the CTGPL data set name 




1. 


PARMPLNN 


Dump the CTGPL new name 




1 


PARMPLPW 


Dump the CTGPL password 


13 D 


1 


PARAv\SW6 


Sixth byte of parameter list 




1 


PARMPLCN 


Dump the CTGPL catalog name 




.1 


PARMPLCI 


Dump the CTGPL control interval 
number 




..1 


PARMPLDL 


Dump the aOPL file aODDNM field 






PARMPLWA 


Dump the CTGPL work area 




.... V.'.'. 


PARMCFL 


Dump the catalog field parameter list 
(CTGFL) 






PARMFLFD 


Dump the CTGFL fields 




1. 


PARMFLfN 


Dump the aOFL field name 




X 




Available 


14 D 




PARMSW7 


Seventh byte of the parameter list 




1 


PARMCFV 


Dump the catalog field vector table 
(CTGFV) 




.1 


PARMFVDL 


Dump the CTGFV file name 




..1 


PARMFVEN 


Dump the CTGFV entry name 






PARMFVKR 


Dump the CTGFV key range list 




.... Y.'.'. 


PARMFVVL 


Dump the CTGFV volume serial list 






PARMDPDL 


Dumpthe DADSM parameter list DLBL 




.... '..'{. 


PARMDPIO 


Dump the DADSM parameter list I/O 




1 


PARMDPWA 


Dump the DADSM parameter list work 
area 



SERVICE AIDS (...Continued) 



Obtaining Snap Dumps of Control Blocks (. . .Continued) 



Offset 


Bytes and 


Field Name 


■ ■ 
Description 


Dec Hex 


Bit Pattern 






15 F 


1 


PARMSW8 


Eighth byte of parameter list 




1 


PARMDPSV 


Dump the DADSM parameter list save 
I/O area 




.1 


PARMCBS 


Dump the AMCBS 






PARMCAXW 


Dump the CAXWA 




...1 .... 


PARMCXRL 


Dump the CAXWA RPL 




.... 1... 


PARMCXDR 


Dump the CAXWA DSCB read-in 
work area (DRWA) 




1.. 

XX 


PARMCAXW 


Dump the C/v\S work area 
Available 


16 10 


8 


PARMRTNN 


Name of test routine 



I 



Using the Test Routine Dump 

IKQVDUMP allows a phase to be called before a dump is taken to see if a dump is 
desired. (The name of the test routine is in the parameter list at field name PARMRTNN.) 
The phase can use any logic to determine whether a dump is needed, and this logic will 
override a call for a dump if it is not needed. If a is returned in register 15, the dump 
will be taken ; if register 15 holds a nonzero return, the dump will not be taken. 

The registers on entry to the test routine have the following contents : 

R2 = Pointer to the parameter list 

Rll = Caller's register 11 

R13 = Pointer to 18-word save area 

R14 = Return address of calling phase 

R15 = Address of entry point 



Using UPSI to Obtain Diagnostic Information for the VSAM Catalog 



Manipulation of the UPSI job control statement enables you to screen catalog return codes 
and obtain a snap dump, cancel a [ob (which causes a full dump to be taken), or simply 
continue processing. You must first use IKQVEDA to enable Snap = 0001. Otherwise the 
UPSI statement will be inoperative. As snap 0001 uses the UPSI byte, it cannot be run when 
the user program in the partition also uses the UPSI byte. 

The purpose of this service aid is to diagnose catalog errors that occur while running any 
program that causes the VSAM catalog to execute. Typically this would be an Access 
Method Sen/ices module or a record management program you have written. 

The //UPSI nnnnnnnn job control statement must precede the //EXEC [ progname ] 
statement. If no UPSI statement is included, the default is //UPSI 000 (see type 3 request 
below). 



SERVICE AIDS ( . . . Continued) 

Using UPSI to Obtain Diagnostic Information for the VSAM Catalog (...Continued) 



On exit from catalog management after processing, a message will be printed out 
depending on the type of UPSI bit setting you hove selected. Some messages require 
a reply from the operator. The return codes in the message are obtained from 
register 15. The format is : 

** NNN, MN, RRR, FFFF, CCCCCCCCCCCCCCCC 



NNN is the return code in decimal 

MN are the last two characters of the module name which issued the 

error. This is blank in case of error code 0. 
RRR is the reason code in decimal 
FFFF is one of the following catalog management functions that hod 

been processed : 

DEFC (define catalog) 

DEFA (define non-VSAM data set) 

DBFS (define space) 

DEF (define VSAM data set) 

ALT (alter) 

DELC (delete catalog) 

DELS (delete space) 

DEL (de lete VSAM or non-VSAM data set) 

LSTC (list catalog) 

UPD (update or update-extend) 

LOC (locate) 

C. .C is either the control interval number in decimal or the first 16 

characters of the date set name or volume serial number in 

EBCDIC. 

If a reply is required from the system operator for certain types of requests, the operator 
must enter one of the following replies from the system console : 

• Type in SNAP to get a snap dump by means of IKQVDUMP (see 
IKQVEDA for enabling snap dumps). The message will then be 
repeated and the operator should press the END key to continue 
processing 

• Type in CANCEL to cancel the job and obtain a full dump. 

• Press the END key to resume processing. 

The following paragraphs describe the four types of UPSI settings you can use to elicit 
a message and/or to determine the degree of return code screening done : 

Type 1 UPSI Setting . If you want to obtain an operator message for all VSAM catalog 
return codes (including 0), you must include one of the following 
statements : 

// UPSI 1 1000000 No reply is required from the operator 

// UPSI 01 100000 A reply is required from the operator 



SERVICE AIDS ( Continued) 

Using UPS I to Obtain Diagnostic Information for the VSAM Catolog (.. .Continued) 



Type 2 UPS! Setting. An operator message is issued only if the return code is not 
for the following statements : 

// UPSI 10000000 No reply Is required from the operator 

// UPSI 01000000 A reply is required from the operator 

Type 3 UPSI Setting. An operator message is not issued if one of the following 
conditions exists: 

1. the Access Method Services command being processed 
was a LISTCAT and the return code is 8, or 

2. the return code Is 0, 40, 68 or 160 

(these code occur during normal processing and are, 

therefore, excluded). 
If neither of these conditions exists, an operator message is 
Issued for the following statements: 

// UPSI 00000000 No reply is required from the operator 

// UPSI 01 1 10000 No reply is required from the operator 

Type 4 UPSI Setting If you want an operator message on a specific return code, 
you must include the following statements : 
// UPSI OOnnnnnn nnnnnn is set to the value, in binary, 

of the code divided by 4. A reply 
Is required from the operator. 



Maintaining DSCB's in the VTOC and VOL! Labels on DASD 

A VSAM DADSM service aid has been provided to assist the programmer and operator 
in maintaining the VTOC and VOLl labels on DASD devices. 

The following procedures should be followed to use IKQVDU at the system console for 
such maintenance. The key difference in the three procedures is the presence, or 
absence, of a// UPSI job control statement. As IKQVDU uses the UPSI byte, it cannot 
be run when the user program in the partition uses the UPSI byte. Steps of the procedure 
in lower cose letters ore typed in at the console ; steps in upper case letters are printed 
out. 

Procedure 1 Explanation 

//assgn sysOOO,x'cuu' cuu points at the volume you want to use. 

(press END key) 

//upsi 1 This job control statement is optional. If It is included, 

(press END key) the following events take place on the volume that was 

assigned to SYSOOO : 

• The VSAM volume ownership bit and CRA TT 
pointer in the F4 DSCB are reset. 

• The entire VTOC Is scratched, that is, empty 
DSCBs are written over existing F 1, F2, and F3 
DSCBs, with the exception of DSCBs that have 
names starting with the characters 'DOS', or 
'PAGE'. 



SERVICE AIDS (...Continued) 



Maintaining DSCB's in the VTOC and VOLl Labels on DASD (. . .Continued) 



Procedure 1 (c'td) 

//upsi 1 

(press END key) 

continued 

//exec ikqvdu, size=auto 
(press END key) 



//assgn sysOOO,x'c 
(press END key) 



y/upsi 11 

(press END key) 



// exec ikqvdu, size=auto 
(press END key) 



Explanation 

• An operator authorization prompt is issued 

if the DSCB to be scratched is security 
protected 

Start Execution of the IKQVDU phase 



Explanation 

cuu points at the volume you want to use 



This job control statement is optional. If it is 
included, the following events take place on the 
volume that was assigned to SYSOOO : 

• The VSAM volume ownership bit and Ci?A TT 
pointer in the F4 DSCB are reset. 

• The entire VTOC is scratched, that is, FO 
DSCBs are written over existing Fl, F2, and 
F3 DSCBs, with the exception of DSCBs that 
have names starting with the characters 
■DOS' or 'PAGE'. 

Start execution of the IKQVDU phase. 



// assgn sysOOO,x'cuu' 
(press END key) 

// exec ikqvdu, size=30k 
(press END key) 

Specify function or reply 

'?' for options ready 

? 

(press END key) 



Explanation 

cuu points at the volume you want to use 

Start execution of the IKQVDU phase. 



The character ? causes a list of the various functions 
that IKQVDU performs to be printed out at the 
system console. 



SERVICE AIDS ( . . . Continued) 



Maintaining DSCB's in the VTOC and VOL1 Labels on DASD 



.Continued) 



To set the Volume Ownership Flag 

To set the CRA Pointer 

To reset the Volume Ownership Flag and 

CRA Pointer 

To set the Security Flag in A F 1 DSCB 

To reset the Security Flag in A Fl DSCB 

To remove a DSCB from the VTOC 

To rename a DSCB 

To allocate a DSCB 

To reinitiate Processing 

To alter or display a DASD VOLl label 

To terminate Processing 
Ready 



reply 'Set Ownership' 
reply 'Set Ownership' 

reply 'Reset Ownership' or 'Reset CRA' 

reply 'Set Security' 

reply 'Reset Security' 

reply 'Scratch' 

reply 'Rename' 

reply 'Allocate' 

reply 'Restart' 

reply 'CUP LABEL=SER=N, .N' or 

'CUP LABELED ISP LAY' 
reply 'End' 



You can avoid printing out this list of functions simply by specifying the function 
you wish as follows ; 

Procedure Explanation 



Set Ownership 
(press END Key) 



Reset CRA or Reset Ownership 



Causes the VSAM ownership bit to be 
set in the F4 DSCB and optionally 
allows the user to set the CRA TT pointer. 

Causes the VSAM ownership bit and 
CRA TT pointer to be reset in the F4 
DSCB 



Set Security 
(press END key) 



Causes the security bit to be set in the 
Fl DSCB 

When th6 console responds with ENTER 
DSN, reply with the data set name of 
the DSCB to be modified. 



Reset Security 
(press END key) 



Causes the security bit in the Fl DSCB 
to be reset. 

When the console responds with ENTER 
DSN, reply with the data set name of the 
DSCB to be modified. 



Scratch DSN=DSNAME 
(press END key) 



Scratch VTOC 
(press END key) 



Causes the DSCB with the specified 
data set name to be scratched. 

Causes the entire VTOC to be scratched 
with the exception of data set names 
starting with the characters 'DOS' and 
'PAGE'. In addition, an operator- 
authorization prompt will be issued if the 
DSCB is security-protected or describes 
a catalog. 
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Maintaining DSCB's in the VTOC and VOL1 Labels on DASD (. . .Continued) 



Rename 

(press END key) 



Explanation 

Causes the DSNAME portion of the F1 

DSCB to be changed 

When the console responds with ENTER 

OLD DSN, reply with the data set name 

of the DSCB to be changed. 

When the console responds with ENTER 

NEW DSN, reply with the new data 

set name. 



Allocate 

(press END key) 



Restart 

(press END key) 



CLIP LABEL=OISPlAY 
(press END key) 



Causes a new DSCB to be created and 

written in the VTOC. In order to 

utilize this function, a DLBL/tXTENT 

job control statement must be provided 

(see 'DOS/VS System Control Statements 

GC33-5376'). 

When the console responds with ENTER 

Filename, reply with the same 

filename as that in the DLBL 

statement referred to above. 

When the console responds with ENTER 

NEW DSN, reply with the data set name 

of the data set to be created . 

When the console responds with DO YOU 

WISH TO SECURITY PROTEa THIS DATA 

SET? reply YES or NO, A reply of YES 

causes the data security bit to be set in 

Fl DSCB. A reply of NO causes the data 

security bit to be reset in the Fl DSCB, 

Causes processing to be reinitiated with 
a READY prompt. This keyword can be 
used OS a response to any operator prompt. 

Causes the volume serial number to be 
displayed on the system console. 



CLIP LABEL=SER=N..N 
(press END key) 



Causes the existing volume serial number 
to be changed to the one specified as 
N..N. 



End 

(Press END key) 



Causes processing to terminate. 



SERVICE AIDS (...Continued) 

Maintaining DSCB's in the VTOC and VOLl Labels on DASD (. . . Continued) 



If an error occurs during execution of IKQVDU, 

**ERROR** DADSM RETURN CODE IS nnn 

prints out on the system console. The following shows the message code 
(nnn), the associated message, and the action required to correct the 
condition. 

Example: **ERROR** DADSM RETURN CODE 
IS 020 VTOC FULL 

nnn Message 

004 I/O ERROR WHILE READING VOLUME LABEL 

Action: If the problem was not caused by a hardware error, 
restore the volume. 

008 VOLUME NOT MOUNTED 

Action: Mount the correct volume. 

012 1/0 ERROR ON VTOC 

Action: If the problem was not caused by a hardware error, 
restore the volume. 

016 DUPLICATE NAME ON VOLUME 

Action; Choose another filename or scratch the original 
file from the volume. If duplication is due to key ranges, 
ensure each UN IQUE key range is on a separate volume. 

020 VTOC FULL 

Action: Delete any NON-VSAM files or VSAM data spaces 
no longer needed from the volume to make additional format 1 
labels available, or reinitialize the volume with a larger VTOC. 

024 EXTENT OVERLAPS EXPIRED FILE 

Action: Examine the VTOC listing to determine where the 
overlap occurred. Correct the EXTENT statement causing 
the error. To delete the expired file, open a DTF using the 
same file-ID as that of the expired file, and instruct the 
operator to reply DELETE to message 4n33A when it is issued. 

028 EXTENT OVERLAPS UNEXPIRED FILE 

Action: Compare the high and low extent limits on the 
EXTENT statement or LSERV output with the file or data 
space limits on the VTOC display. If the extents overlap, 
correct the EXTENT statement in error. 

032 EXTENT OVERLAPS PROTECTED UNEXPIRED FILE 

Action: Examine the VTOC to determine where the overlap 
occurred. Correct the EXTENT statement causing the error. 
If necessary, use another volume. 



036 EXTENT OVERLAPS VTOC - 

Action: Execute LVTOC. The Format 4 label (the first label 
in the VTOC display) contains the extent limits of the VTOC. 
If the program being executed uses a temporary label set and 
overlaps the VTOC, correct the EXTENT statements that over- 
lap. If the job uses standard or partition standard labels, use 
the LSERV output to correct the extents of the overlapping 
file, VSAM data space, or UNIQUE VSAM file. Then rebuild 
the appropriate label tracks. 

040 REQUIRED EXTENTS MISSING 

Action: If temporary labels were used, match the extents 
on the incoming EXTENT card with the extents in the LVTOC 
output. If standard (permanent) labels were used, match the 
extents in the LSERV output with those in the LVTOC output. 

044 DSCB NOT FOUND 

Action: Use the LVTOC output to check for all file labels 
used in OPEN macros. If the file has been destroyed, it was 
probably due to deletion of overlapping extents on an 
unexpired file, and the file must be rebuilt. 

056 EXTENT OVERLAPS PROTECTED EXPIRED FILE 

Action: Examine the VTOC listing to determine where the 
overlap occurred. Correct the EXTENT statement causing 
the error. If it is not necessary to save the expired file, 
open a DTF using the same file-ID as that of the expired 
file, and instruct the operator to reply DELETE to message 
4n33A when it is issued. 

064 GETVIS FAILURE ENCOUNTERED 

Action: Allocate GETVIS area. 

072 CDLOAD FAILURE ENCOUNTERED 

Action: Either the CDLOAD directory or the GETVIS area 
is full. Allocate more space. 

080 OVERLAP AMONG NEW EXTENTS 

Action: If DLBL and EXTENT statements are included in the 
program, determine the conflicting extents and correct them. 
If a standard label set is being used^ use the LSERV output to 
locate and correct the conflicting file extents, and rebuild 
the standard label tracks. 



Loading a VSAM Phase or a program You Have Written 

If you want to load and transfer control to and from a selected VSAM phase or a 
program you have written, you can use B-transient $$BCVS03 without destroying 
any registers in the following calling sequence ; 

LA 1,PARMLIST 
SVC 2 



PARMLIST DC CL8'$$BCVS03' 
RTNNAME DC CLS'XXXXXXXX' 



USERLIST DC 



B Transient 

Name of phase or program you have 

written 

Parameterlist for 'XXXXXXXX' 



When control is received by 'XXXXXXXX', the registers have the following 
contents : 

RO = Address of a work area (the size of the work area is specified 

by a halfword at offset 4 of 'XXXXXXXX' phase 
Rl = Pointer to user's parameter list (USERLIST) 
R2-13= Remain the same as they were when SVC 2 was issued 
R14 = Return address of calling module 
R15 = Address of entry point in 'XXXXXXXX' 



Control is returned from 'XXXXXXXX' by a BR 14 instruction. 



CHAPTER IV 

MODEL 20 EMULATOR 



I 



M 20 EMULMOR 



Flow of iniHolization 



DOS/VS SUPERVISOR 



Performs Initialization for : 
Communication Region 
. Buffers 
. CCB's 

- Issues STXITS for : 

Operator Communication 
. Abnormal EOJ 
. Program Check 

- Loads 'EMUNAME H' 



I 



Selects Communication Functions 
(Control card analysis) 



Reads and processes 
Emulator Control Statements 
Updates CRI and EDB's 



Checks validity of assigned 
devices 



Selects Communication Functioi 
(Loading of EMUNAME U) 



Loads 'EMUNAME U' 



Prepares for ussuing DIL 20 



Beginning of Emulation 

Loading of M20 emulated'storage 



M 20 EMULATOR (. . . Confinued) 



Emulafor Layout 



CCW and buffer for read ahead option on a 
2501 (160 bytes) 



Error recovery buffer on a 
•2540 (81 bytes) 



CCW and buffer for printer 
(132 bytes) 



Card reader buffer 
(160 bytes) 



Emulated Model 20 storage (1) 
(from 4K to 32K, minus 144 bytes) 



EDBs (2) 



CCBs and buffers for communications 
routines 



Communication region (3) 



CCBs and buffers for communications 
routines 



Fixed communication region data areas 



Emulator routines 



IISCP, IISCPS, IISDB, IISDD, IISDF, 
IISDFED, IISDI, IISDK, USED, IISHC, 
IISTD, IISTP, IISTR. 

Optional 



emunameU (4) emunameH (4) 

IISCM IISHF 

IISCMS 

IISDI 

IISD2 

IISD3 

IISD4 

IISDE 

I IS ID 

IISMD2 

IISMF 

IISPD2 

I IS IN (last routine) 



M 20 EMULATOR 



Emulator Layout (..Continued) 



Device independence buffers (optional) 
Tope read ahead buffers (optional) 



1 USE I is loaded here and overlays 
itself at end of initialization 

2 EDBs are also loaded in the disk area 
of the communication region when disk 
and device independence are not 
included in the emulator 

3 The communications region is loaded 
and moved up to a 256-byte boundary 
by IISEI at initialization 

4 The phases emunomeU and emunameH 
overlay one another 



COMMUNICATION REGION CRl 



CRBYTE12 

1st 2 bytes M20 Inst 



CR5000 

base reg ss Inst 



CR6000 

base reg ss Inst 



CRDIL 

EA 20 3000 3100 DIL Instruction 



CRM20PSW 
current M20 PSW 



CRMAPORG 

A (M20 address 0) relocation factor 



CRSIZE20 

M20 core size - 1 



CRPEADD 
A(IISCPPE) 



CRDCNTRT 
A(IISNEIR) 



CRM20INT 
A(IISINTIR) 



CRDILCNT 
current value 



CRINTFLG 
pending Interrupts 



CRIRCAL 

current Inst when error occurs 



CRPECC20 
M20 error code 



CRDFADD 
A(IISDFED) 



CRDKBFWK CRDKBFAC CRDKOLDB 



CRDKOLDR 



JLCRSAVM20 
M20 register save area 



CRMAPEND 

A (last byte of emulated storage) 



CRLASTFW 

A (last full word of emulated storage) CRMAPEND-3 



CRLSTCCW 

A (last possible M20 COW) CRAAAPEND-5 



• For further explanation : see end of the table 
IV -04 



COMMUNICATION REGION CR 


(. . .Continue 


d) 






Hex 
AO 

CO 

CC 
DO 

DC 
EO 

E4 
E8 

EC 

FO 

F4 

F8 

FC 
100 

IFC 
200 

234 
238 

280 
288 
290 




Dec 










160 


CRDEVTAB 
:A (EDB of device to be emulated) : 

• 


192 
204 


CRINTCOD 

M20 interrupt code table 


208 
220 


CREDBDIS 

displacement into CRDEVTAB 


224 


CRDELADD 

A(IISTDDL) delay routine 


228 


CRIOAa 


CREMLFLG ^ICREMUIND 


232 


CRSUBMOD 
M20 model 


CRSKIPSW 

• 


CRLSTCNT 

last CRD ILCNT- before DIL 


236 


CRHFPSW 
previous M20 PSW 


240 


CRCMADD 

A(IISCM) orA(IISCMS) 


244 


CRSIOTPE 
A(IISTP) 


248 


CRSIODSK 
A(IISDK) 


252 


CRBFTPL tape buffer size for read ahead 


256 
5nR 


CRDISPTB 

used by DIL : 1 byte entry for each M20 inst byte configuration. 
Ilndex to CROPCODE table : 


512 


CROPCODE 
rA(specific emulation routine) 13 full words - 


564 


CREDFADD 
A(IISEDF) 


568 


CRSAVCPU 
.save area for STXIT macro (program check while executing M20 
-instruction) 


640 


CRHFCWPK 

CCW for comm PK routines 


648 


CRCCWRD 

CCW for read card 


656 


CRCCWPN 

CCW for punch card 



I 



• For further explanation : see end of the table 
IV -05 



COMMUNICATION REGION CRl (..Continued) 





Hex 
298 

2A0 

2A4 

2A8 

2AC 

2B0 
2B4 

2B8 
2BC 

2C0 
2C4 

2C8 
2CC 
. 2D0 
2D4 
2D8 
2DC 
2E0 
2E4 
2E8 

2F8 
2FC 






Dec 






664 


CRCCWPR 
CCW for print 


672 


CRCCWWCP 

A(chain for M20 MFCM write card) 


676 


CRCCWPKP 

A(chain for M20 PK ops) 


680 


CRCCWTP 

A(chain for M20 tape ops) 


684 


CRDIADD 
A(liSDB) 


688 


CRHFIAGI 


CRHFLAG2 


CRHFLAG3 


CRHFIAG4 


692 


CRHFMSGN 
msg number 


CRHFINDP 
displacement 
inHFLINTAB 
of ilSHFIN 


CRHFCMDP 

displacement 

inHFUNTAB 

of 

IISCHFCHR 


CRHFBRTB 

t 


696 


CRHFTYMG^ 


CRHFCX 1 


700 


translation tab e char A-B to hex A-B 


CRHFDISP ^ 1 


704 


CRHFFCAD 
A(HFUNTAB) 


708 


CRHFASAD 

A(STOP address) ^ 


CRHFMSGH 

• 


CRCHKDSK 

• 


712 


CRHFSCRN 

screening mask for the latest msg issued 


716 


CRHFPBFA 

A(print buffer for comm routines) 


720 


CRHFRBFA 

A(read buffer for comm routines) 


724 


CRHFCCRA 

A(IISHCCR) comm control routines 


728 


CRHFRETA 

A(IISHCEIR) communications : exit routine 


732 


CRHFIKAD 

A(ilSHCIK) S/370 interrupt key routine 


736 


CRHFTRAD 
A(IISHF) 


740 


CRHFCCBA 

A (DOSAS CCB's for communication routines) 


744 


CRHFXC 

translation table hexa A-F to char A-F 


760 


CRHFRTCD 

comm routines return code from B transient 


764 


CRHFOVLH 

communication routine phase name 



• For further explanation : see end of the table 



COMMUNICATION ?1C:C^ C?.1 (...Continued) 



Dec Hex 

772 304 

780 30C 

784 310 

788 314 

792 318 

796 31 C 

800 320 

804 324 

808 328 

812 32C 

816 330 

820 334 

824 338 

828 33C 

832 340 

876 36C 

880 370 

884 374 

888 378 

892 37C 

896 380 

900 384 



CHh^OVLU 

unit record routine phase name 



CRHrERTP 

error type for 1I5HFMSG 



CRD IF STB 

A(first buffer for device independence) 



CRDIBUFL 

device independence buffer size 



CRDIBUFN 

A(second buffer for device independence) 



CRDIHBUF 

lost byte of device independence buffers 



CRDIEDB 

A(EDB for device independence) 



CRDlCa 

A(M20 carriage control tape) 



CRDIRD 

A(M20 read routine) 



CRDIPN 

A(M20 punch routine) 



CRDIPT 

A(M20 printer routine) 



CRDIER 

A(M20 error routine) 



XIO displacement byte table 



CRDICM 

A(IISIDI) I/O decode 



CRDICMEN 
A(llSiDIEN) I/O decode 



aDIMTSD 

A(IISTD) DOS tape/disk module 



CRDIEDBC 

A(EDB control card reader) 



CRD I LOAD 
A(M20 (PL) 



aiNKSAV 

return to caller after IISINEIR 



• For further explanation : see end of the table 
IV -07 



COMMUNICATION REGION CRl (...Cont'd) 



CRSAVERR 

STXIT OC save area 



EDB active list (16 words) 
CREDBAa 



I/O op in overlap or time sharing mode 



CRBINDEL 

last card delimiter read binary 



CRHFTRAC 

A(IISTR) trace routine 



CR20CCW1 

A(first M20 CCW used by IISTP) 



CRCARDEL 

last card character in DC of M20 CPU macro or EC control statement 



CRCHKCNT 

Record and file count for checkpoint 



CRDATADD 

A(M20 tape CCW data address) used by IISTP 



CRSAVCCB 

A(CCWin C3) used by IISTP 



CRSAVER 

area for count/ file update used by IISTP 



CRCCWCNT 

M20 CCW record count used by IISTP 



Table of indexes into CRXIOTAB 

CRXIODIS 

1 entry for each DAFS 



Table of indexis into CRCIOTAB 

CRCIODIS 

1 entry for each DAFS 



Table of indexes into CRTIOTAB 
-^CRTIODIS 

1 entry for each DAFS 



CRERR4 

A(CPU error code 4 n 



CRERR5 

A(CPU error code 5 roul 



CRERR6 

A(CPU error code 6 roul 



CRERR7 

A(CPU error code 7 roul 



• For further explanal 



ine) 



ine) 



ine) 



: see end of the table. 



COMMUNICA TION REGION CRl (...Cont'd) 

Dec Hex 

1338 53A 

1380 564 

1384 568 

1388 56C 

1392 570 

1396 574 

1400 578. 

1404 57C 

1408 580 

1412 584 

1416 588 

1420 58C 

1422 590 

1428 594 

1432 598 

1436 59C 

1440 5A0 

1444 5A4 

1448 5A8 

1452 5AC 











CRERROR 

A(routine handling all M20 program error stops) 


CREMUBGN 

A(first emulator byte) 


CREMUEND 

A(last emulator byte) 


CRDILADD 

reserved for hardware 


CRDKSTAS 

1st sector in command 


static 

CRDKLERF 

lost error free sector 


CRDKOBJS 
EXCP target sector 


CRDKEOC 

end of cylinder sector 


dynamic 

CRDKLDEF 

last error free sector 


CRDKECD 

end of command sector 


CRDKRSa 
residual count 


CRDKLia 

last count used (head/record) 


CRDKLSTO |CRDKFAST 
disk unit lost op 

1 


CRD KEF DT 

no error free data sectors 


no bytes in sector in error 
CRDKLBDT 


CRDKCCHR 

field used by ID.... 


CRDKCCHR 

.... conversion routine 


not used 


CRDKIDPC/CRDKHTSR 
A(S/370 identifier) for partial 


case - Conversion routine - 

o 


CRDKNSSK 
S/370 seek field 




CRDKCCHE 
cyl. number 


CRDKHHHE 
head number 


CRDKHRE 
record nbr 


CRDKINDI 

e 


CRDKM20 

e 


CRDKEXCT 

o 


CRDKEOC 1 

• 


CRDKEXC2 


CRDKDFDB 

e 


CRDKDDDB 

• 


CRDKDSa 




not used 

o 


CRDKCDTB 

A(chain descriptor table) 


CRDKSKTB 
A(skeleton table) 


CRDKMOTB 
A(modifier table) 





o For further explanation : see end of the table 
IV -09 



COMMUNICATION REGION CRl (...Cont'd) 





Hex 
5B0 

5B4 

5B8 

5BC 

5C0 

5C4 

5C8 

5CC 

5D0 

5D4 

5D8 

5DC 
5E0 
5E4 
5E8 








Dec 










1456 


CRDKCCWA 
A(S/370 CCW area) 


1460 


CRDKKYAD 

A(S/370 key buffer for extra read) 


1464 


CRDKDAAS 

A (data buffer for scan) 


1468 


CRDKIDTB 

A(S/370 identifiers table) except for scan 


1472 


CRDKIDAS 

A(S/370 identifiers table) for scan 


1476 


CRDKDK 
A(IISDK) 


1480 


CRDKDF 
A(IISDF) 


1484 


CRDKDD 
A(IISDD) 


1488 


CRDKaiH 

M20 cnt field length 


CRDKSCLH 

data sector length 


1492 


CRDKBASE 

save area for base register 


1496 


CRDKTOTS no of sectors 
given by DOS extents 


CRTRSKPS 

• 


CRPERF 

• 


1500 


CRXIOTAB (variable length) 
A(DIL instruction) 


1504 


CRPKADD A(IISDE) 

if PK is emulated, otherwise CRDIL 


1508 


CRTDADD A(IISTDXIO) 

if Tape/disk is emulated, otherwise CRDIL 


1512 


A(routines used to emulate M20 XIO ops) 
"? bytes entry by emulated device 




CRCIOTAB 

A(routines to emulate M20 CIO ops) 




.CRTIOTAB 

A(routines to emulate M20 TIO ops) 



• For further explanation : see next pages 



COMMUNICATION REGION FLAG BYTES LAYOUT 



Displacement 


Field name 


Bytes 


Field description 


Dec Hex 


38 26 


CRINTFLAG 




Flags for pending M20 interruptions 




Byte 1 


1 


2501 card read 




CRURINT 


'..i! .... 
...] .... 
.... ]... 

1.. 

1. 

1 


2520/2560 card read 

1403/2203 print 
2560 card punch 
1442 card punch 
2560 card print 
2520 cord punch 
not used 




Byte 2 


1 


tope 




CRTDPK 


.1 

..1 

...1 .... 
.... I... 

1.. 

1. 

1 


disk 

2152 read 

2152 write or carrier return 

2152 inquiry request 

CC2 interrupt request 

not used 

not used 


160 AO 


CRDEVTAB 




Addresses of EDB's of M20 devices that 
can be emulated, as follows : 




CR2501AD 


1- 4 


2501 card reader 




CR1442AD 


5- 7 


1442 card punch 




CRPRINAD 


8-12 


1403 or 2203 printer 




CR2520AD 


13-16 


2520 card read -punch (or card punch) 
or2560MFCM(CR2560AD) 




CR2560BD 


17-20 


2560 2nd EDB address (IFDi or 
3505-3525) 




CR2152AD 


21-24 


2152 printer-keyboard 




CRIOCAD 


25-28 


I/O channel 




CRSCAD 


29-32 


Storage control 


228- E4 


CRIOACT 








Byte 1 


1 

...1 .... 


2501 card read 

2520/2560 cord read ^$Q 
1403/2203 print q § Q 
2560 punch "§ ° ^ 
1442 punch 5- 5: -^ 






.... 1... 






1., 


2560 card print f. c;- Q 






1. 


same 
1, dal 
> pendi 

ll 






1 




Byte 2 


1 

.1 

..1 

...1 .... 
.... 1... 

:::: :';: 

1 


tape ^li 
disk 3 5. 
2152 read o* S 
2152 write or carrier return o Q 
2152 inquiry request 2 
CC2 interrupt request ^ 
not used ^ 
not used O 



COMMUNICATION REGION FLAG BYTES LAYOUT (...Cont'd) 



Displacement 


Field name 


Bytes 


Field description 


Dec Hex 


230 E6 


CREMUFLG 




Emulator program indicators 




CRCCFIAG 


1 


M20 PSW condition code can be modi- 
fied by current AA20 instruction 




CRERRFLG 


.1 


Error was detected while decoding 
current M20 instruction 




CREDBIN 


..1 


An EDB is to be inserted in CREDBACT 
by IISINEIR 




CRDCNTIN 


...1 .... 


A new DILCNT must be stored at 
CRDILCNT 




CRWAITIO 


.... 1... 


IISINEIR must complete all outstanding 
I/O operations 




CRHFOUT 




IISINEIR must return to comm. routines 




CRETURN 


1. 


IISINEIR must return to caller 




CREIRBIT 


1 


IISINEIR has been called by an 
emulator routine 


231 E7 


CREMUIND 




Emulator program indicators 




CRDELAYT 


1 


IISINEIR must call IISTDDL to perform 
tape operation 




CRDELAYD 


.1 


IISINEIR must call IISTDDL to perform 
disk operations 




CROVLUR 


..1 


Unit record I/O operation must be 
treated in overlap mode 




CROVLTP 


...1 .... 


Tape I/O operation must be treated 
in overlap mode 




CROVLDK 


.... 1... 


Disk I/O operation must be treated in 
overlap mode 




CRDELAYF 


1.. 


Delay ON must be performed by IISTDDL 




CRDELAYC 


1. 


Both a tape and a disk operation have 
been delayed 




CRM20TSS 


1 


M20 time sharing switch is being 
emulated. 


232 E8 


CRSUBMOD 


xxxxxxxx 


Hexadecimal F5 if M20 Submodel 5 or 6 
is being emulated 


233 E9 


CRSKIPSW 


xxxx xxxx 


Skip indicator for trace 


688 2B0 


CRHFLAGl 




Calls for processing : 




CRHFAS 


1 


M20 address stop 




CRHFHPR 


.1 


M20 HPR 




CRHFPE 


..1 


M20 program error 




CRHFEM 


...1 .... 


Emulator message 




CRHFSS 


.... 1... 


M20 instruction step 




CRHFTR 


'•• 


Trace to be made of all M20 
instructions executed 




CRHFIK 


1. 


Interrupt key 



COMMUNICATION REGION FLAG BYTES LAYOUT (...Cont'd) 



Displacement 


Field name 


Bytes 


Field description 


Dec 


Hex 


689 


2B1 


CRHFLAG2 

CRHFASP 

CRHFSYNP 

CRHFEMP 

CRHFSSP 

CRHFIKP 


1 

.1 

..1 

...1 .... 

.... 1... 


Calls being processed : 

M20 address stop 

M20 HPR or program error 

Emulator message 

M20 instruction step 

interrupt key 


690 


2B2 


CRHFLAG3 

CRHFICC 

CRFFDCC 

CRHFINIT 

CRHFCMP 

CRHFCHN 

CRHFTC 

CRHFTRCE 

CRHECIM 

CRHFICER 


1 

.1 

..1 

1.. 

1. 

1 

1 


Indicates : 

Initialization control card 

Dynamic control card 

IISHFIN called 

IISHFCMR called 

Control statement chaining 

Count option for debugging 

Trace option for debugging 

M20 decimal operation 

Error in initialization control card 


691 


2B3 


CRHFLAG4 

CRHFEMT 
CRHFERSW 

CRHFDF 

CRHFDFTT 

CRHFDFIO 

CRHFTASW 
CRHFSTSW 
CRHFLC 
CRHFIKAC 


1 

.1 

..11 .... 

..1 

...1 .... 

.... 1... 
1.. 


Indicates : 

IISHF has been loaded 

Error has been detected in a control 

statement keyword or operands 

Mask for emulator on M20 trace 

Emulator contains routines for trace 

Emulator contains routines to execute 

keyword lOT of control statement DF 

M20 trace or address stop 

M20 instruction step 

2501 lost card has been read 

M20 INTERRUPT key has been pressed 

during execution of IISINEIR 


693 


2B5 


CRHFINDP 


1 1 


Displacement in HFUNTAB of IISHFIN 


694 


2B6 


CRHFCMDP 




Displacement in HFUNTAB of IISHFCMR 


695 


2B7 


CRHFBRTB 


xxxx xxxx 


B-transient area 


696 


2B8 


CRHFTYMG 


.1 


Type of message : 
Information 


CRHFINF 






CRHFDEC 


..1 


Decision 






CRHFAa 


...1 .... 


Action 






CRHFAEOJ 


.... 1... 


Automatic End Of Job 






CRHFERMS 


1. 


Error 






CRHFCONT 


1 


Continuation 


703 


2BF 


CRHFDISP 




Displacement of entry point of a control 
statement routine in HFUNTAB 


708 


2C4 


CRHFASAD 


x^x x^x 


In address stop mode, address of M20 byte 
at which emulator is to stop 


710 


2C6 


CRHFMSGH 




Number of the latest decision or action 
message issued 



COMMUNICATION REGION FLAG BYTES LAYOUT (. . . .Cont'd) 



Displacement 


Field name 


Bytes 


Field description 


Dec 


Hex 


711 

782 


2C7- 
30E 


CRCHKDSK 


xxxx xxxx 


Indicates whether checkpoint file is open 
Device independence switches 


CRINDIMP 






CRDISCFL 


X'80' 


Screening flag for D. 1. initialization 






CRDIGEN 


X'40' 


Device independence option generated 






CRD 1 GENT 


X'20' 


Device independence option for tapes 






CRDIGEND 


X'10' 


Device independence option for disks 






CRD 1 ACT 


X'08' 


Device independence option active 






CRDIMESG 


X'04' 


Device indep, inf. message switch 






CRDICCTM 


X'02' 


Device indep. two messages switch 






CRDINTMG 


x'or 


Device indep. initialization message 


784 


310 


CRDTFDI 
CRSTPH 




A{DTFDI for device independence 

routines) 

A(IISTPH if read ahead on tape - No 

device independence) 


808 


328 


CRDIERR 


xxxx xxxx 


Error return code 


809 


329 


CRDICD 




Buffer Allocation/Release flag 






CRDIALLC 


X'80' 


Allocation request 






CRD IRE LS 


X'40' 


Release request 






CRDIRCLC 


X'20' 


Dl off command 






CRDIRDIN 


X'lO- 


RCC/IN IT command 






CRDILD 


X'08' 


LD command 






CRDIEOJ 


X'04' 


EOJ command 






CRDIRET 


X'02' 


Return to caller via link reg. 


810 


32A 


CRD IF LAG 




Dl working switches 






CRDIFST 


X'80' 


1st time switch for printer 






CRD 1 CHAN 


X'40' 


No hole found in carriage control tape 






CRDIFSW 


X'20' 


Buffer allocation message switch 






CRDIRDM 


X'lO' 


Read control cards in Dl mode 






CRDIRPK 


X'08' 


Read from PK at initialization 






CRDIOPN 


X'04' 


OPEN issued for DTFDI 


1409 


581 


CRDKFAST 




Indicator for performance 






CRDKVRIF 


X'80' 


Verify option ON 






CRDKHTRY 


X'40' 


Hit occurred on last command 






CRDKSCAN 


X'20' 


Scon 6 SCTRS option ON 






CRDKRDBF 


X'10' 


Use buffer for read option ON 






CRDKMVDD 


X'08' 


Read and move SCTRS to M20 


1420 
1435 


58C 
59B 


CRDKHTSR 


X'80' 


Hit sector addr in scan buffer 
M20 indicators for disk 
End of cylinder 


CRDKINDI 


CRDKEEOC 






CRDKEDTA 


X'40' 


Data address error 






CRDKECTA 


X'20' 


Count address error 






CRDKEDDC 


X'10' 


Data check in data area 






CRDKEKDC 


X'08' 


Data check in count area 






CRDKSHIT 


X'04' 


Scan hit 






CRDKSNEQ 


X'02' 


LE or HE scan hit 


1436 


59C 


CRDKM20 




M20 control byte. Class of operation 






CRDKCTRL 


X'80' 


Control operation 






CRDKCIO 


X'40' 


10 sector max operation 






CRDKCIOO 


X'20' 


100 sectors max operation 






CRDKSCCL 


X'10' 


Scan class 






CRDKCTDT 


X'08' 


Count and data class 






CRDKDTCL 


X'04' 


Data class 



COMMUNICATION REGION FLAG BYTES LAYOUT (. . . .Cont'd) 



Displacement 


Field ncre 


Bytes 


Field description 


Dec 


Hex 


1437 


59D 


CRDKEXCT 


X'OT 


Control byte for building CCW's 
Scan equal 


CRDKSCEQ 






CRDKUSH 


X'02' 


Unshuffling to make 






CRDKWRCL 


X'09' 


Write class 






CRDKVRCL 


X'OC' 


Verify class 






CRDKCTDA 


XMO' 


Count and data class 






CRDKSHU 


X'18' 


Shuffling to make 






CRDKINCA 


X'AO' 


Increasing address command 






CRDKRDCD 


X'B2' 


Read count and data 






CRDKFFKY 


X'CO' 


S/370 search command with X'FF' in 
key area 


1438 


59E 


CRDKEXCl 


X'80' 


Control byte 1 of IISDF 
First EXCP loop 


CRDKLPl 






CRDKLSLP 


X'40' 


Last EXCP loop 






CRDKEXT2 


X'20' 


Extent 2 used 






CRDKRCSC 


X'08' 


Read count successful 






CRDKEXRD 


X'04' 


Extra read requested , Hit for LE or HE 






CRDKWAIT 


X'02' 


Wait requested 






CRDKNSID 


X'Ol' 


Indicator for identifier conversion 


1439 


59F 


CRDKEXC2 


X'80' 


Control byte 2 of IISDF 
Delay routine called 


CRDKDELY 






CRDKBDEX 


X'40' 


Bad extents information 






CRDKPART 


X'20' 


Data partially processed 






CRDKIOOP 


X'lO' 


DOS I/O indicator 






CRDKEQUA 


X'08' 


Equality in compare routine 






CRDKHNEQ 


X'04' 


Hit not equal in compare routine 






CRDKINID 


X'02' 


Increasing ID addresses 






CRD Kl EXT 


X'Ol' 


One extent ol-ready given 


1440 


SAO 


CRDKDFDB 




S/370 CCW control dispatching byte 






CRDKDFCW 


X'80' 


Caller wonts CCW control 






CRDKDFID 


X'40' 


Caller wants ID convereion 


1441 


5A1 


CRDKDDDB 




IISDD control byte 






CRDKDDEX 


X'80' 


Caller wants EXCP 






CRDKDDOP 


X'40' 


Caller wants OPEN 


1442 
1498 
1499 


5A2 
5DA 
5DB 


CRDKDSCT 


xxxx xxxx 
xxxx xxxx 


Description count for CCW builder 
Trace of first skip to channel 1 
Performance improvement 


CRTRSKPS 


CRPERF 






CRTAPAH 


X'80' 


Read ahead for tape 






CR25AH 


X'40' 


Read ahead for 2501 



EDB I 


j^YOUT 

Hex 


4 

8 

C 

10 

14 

18 


4 
8 
C 
10 
14 


2501 Card Reader and 2520 Card Reader Punch 




Dec 


1 1 1 





EDBCTLBK 

A(DOS/VS CCBorDTFPH) 


4 


EDBINT 

A(end of operaMon routine) 


8 


EDBCNTC 

Current DILCOUNT 


EDBCNTS 

Standard Dl LCOUNT value 


12 


EDBTYPE 

• 


EDBINTMK 
Int. mask 


EDBFLAG 

• 


EDBSS 
Select stacker 


16 


EDBDATAL 
Data count 


not used 


20 


EDBRDBUF 

A (read card buffer) 


24 


EDBDATAD 

Data address for read operation 




1442 Card Punch and 2520 Card 


Punch 





EDBCTLBK 

A(DOSAS CCBorDTFPH) 


4 


EDBINT 

A(end of operation routine) 


8 


EDBCNTC 

Current D I LCOUNT 


EDBCNTS 

Standard DILCOUNT value 


12 


EDBTYPE 

• 


EDBINTMK 
Int. mask 


EDBFLAG 

• 


EDBSS 
Select stacker 


16 


EDBPNBUF* 

Save area for ERP(address) 


20 


EDBPNCNT* 
Count Tor ERP 


not used * 



* When emulated by 2540 Card Read Punch 

• See Flag bytes layout 



IV-16 



EDB LAYOUT (....Cont'd) 



Dec Hex 




12 


C 


16 


10 


20 


14 


24 


18 


28 


IC 


32 


20 








4 


4 



12 


C 


16 


10 


20 


14 


24 


18 


28 


IC 


32 


20 


36 


24 


40 


28 


) 44 


2C 



1 1 1 


EDBCTLBK 
A(DOSASorDTTPH) 


EDBINT 

A(end of operaHon routine) 


EDBCNTC 

Current DILCOUNT 


EDBCNTS 

Standard DILCOUNT value 


EDBTYPE 

• 


EDBINTMK 
Int. mask 


EDBFLAG 

• 


EDBSSFl 
SSfeedl 


EDBDATAL 
Data count 


EDBSSF2 
SS feed2 


EDBSSPN 

SS punch 1 


EDBRDBUF 

A(read card buffer) 


EDBDATAD 

Data address for read operation 


EDBSTAT** 
Card position 


EDBWCHSL** 
Head selectio 




EDBWCHD** 
Head selection 







I 



Storage Control 




** MFCM with Print card 


EDBaiBK 
A(DTFPH) 


EDBINT 

A(end of operation routine) 


EDBCNTC 

Current DILCOUNT 


EDBCNTS 

Standard DILCOUNT value 


EDBTYPE 

• 


EDBINTKM< 
Int. mask 


EDBFLAG 

• 


EDBFLAG2 


EDBLONG 
Length of EDB 




EDBCSW 

CSW for the device 


not used 


EDBSENSE 






Sense status 


EDBMXCL 
Max cyl no 


EDBHDSEL 
Last head 


EDBSKCL 
Last seek 






EDBEXTl 
Extent table nr 1 


EDBREaK 
S/370 records/ 
track 


EDBEXT2 
Extent table nr 


2 








EDBTKCYL 
S/370 track/ 


not used 



• See Flag bytes layout 



EDB 


J^YOUT (. . 

Hex 


4 

8 

C 

10 

14 

18 

IC 



4 
8 

c 

10 


4 
8 
C 


.Cont'd) 
I/O Channel 








Dec 


1 1 





EDBaiBK 
A(DOSASCCBorDTFPH) 


4 


EDBINT 

A(end of operation routine) 


8 


EDBCNTC 

Current DILCOUNT 


EDBCNTS 

Standard DILCOUNT value 


12 


EDBTYPE 

• 


EDBINTMK 
Int. mask 


EDBFLAG 

• 


EDBFLAG2 

• 


16 


EDBLONG 
Length of EDB 




20 


EDBCSW 

CSW for the device 


24 


EDBRECRD 
Record counter 


EDBTM 
File counter 


28 


EDBSVREC 

Record and file counter when UC in CCB 




1403/2203 Printer 







EDBaiBK 

A(DOS/VS CCBorDTFPH) 


4 


EDBINT 

A(end of operation routine) 


8 


EDBCNTC 

Current DILCOUNT 


EDBCNTS 

Standard DILCOUNT value 


12 


EDBTYPE 

• 


EDBINTMK 
Int. mask 


EDBFLAG 

• 


EDBDELOP 
Delay code 


16 


EDBLENG 
Line length 


EDBRESPA 
Residual space 


not used 




2152 Printer Keyboard 







EDBaLBK 
A(DOS CCB) 


4 


EDBINT 

A(end of operation routine) 


8 


EDBCNTC 

Current DILCOUNT 


EDBCNTS 

Standard DILCOUNT value 


12 


EDBTYPE 

• 


EDBINTMK 
Int. mask 


EDBFLAG 

• 


EDBNASAL 

ASA carrier 

return 



t See Flag bytes layout 



EDBLAYOirr (....Cont'd) 

Extension for Device Independence 



Dec Hex 




12 


C 


16 


10 


20 


14 


24 


18 


28 


IC 


32 


20 


36 


24 


40 


28 



EDBDIST 



EDBD1ST2 



EDBBLKSZ 
Block size 



EDBBLKF 
Blocking factor 



EDBCaiG 

Length carriage ctl tape 



EDBaiD 

Index of carriage tape image 



EDBDTFPT 
A(active DTP) 



EDBDTFIT 
A(input tape DTF) 



EDBDTFOT 
A(output tape DTF) 



EDBDTFID 
A(input disk DTF) 



EDBDTFOD 
A(output disk DTF) 



EDBBFADD 

A(output device independence buffer) 



EDBIOREG 

A(last logical record in buffer) 



EDBDIASA 

ASA control character 



• See Flag bytes layout 



IV -19 



EDB FLAGBYTES LAYOUT 



Displacemenf 


Field name 


Bytes 


Field description 


Dec Hex 


12 C 


EDBTYPE 




Definition of the M20 device: 






EDBSC 


nil nil 


Disk 






EDB 1442 


1 


1442 Card Punch 






EDB250I 


.1 


2501 Card Reader 






EDB2520 




2520 Cord Read Punch 






EDB2520P 


'.'..'] ...'. 


2520 Card Punch 






EDBMFCMl 


.... I... 


2560Avy:CM (feed 1) 






EDBMFCM2 


1.. 


2560 AvM^CM (feed 2) 






EDBPRINT 


1. 


1403/2203 Printer 






EDBPK 


I 


2152 Printer Keyboard 






EDBIDC 




Tape 




14 E 


EDBFLAG 
EDBLSTCP 


, 


M20 indicators for: 




Last card 


NO 




EDBFEED 


.1 


Previous M20 operation included 


1 








a feed for 2520 Card Read Punch 




EDBTODEV 


..I 


2520 Card Read Punch is emulated 


i 








by 3525 Card Punch; or 2560 








MFCM is emulated by 3525 Card 


i 








Punch 




EDBDIFIR 


...1 .... 


First request to execute CIO SS in- 
struction during device independence 


Q. 

2 




EDBMESG 


1. 


Pending message 


§. 




EDBDI 
EDBTODEV 


I 

..1 


EDB includes device independence 


^ 


1442/2520 Card Punch is emulated 


% 








on 2520/3525 Card Punch 




EDBPNER 


I.. 


1442/2520 punch error 


K 




EDBMESG 




Pending message 


o 




EDBDI 
EDBLSTCD 


1 


EDB includes device independence 


o 


Last card 






EDBFEED 


.1 


Previous M20 operation included 
a feed for 2520 Card Read Punch 






EDBTODEV 


..1 


2520 Card Read Punch is emulated 
by 3525 Card Punch; or 2560 
MFCM is emulated by 3525 


s 




EDBPNFIR 


...1 .... 


First request for punch or punch - 
feed on 3505 Card Reader 


s 

% 




EDBWCFIR 


.... I... 


First request for v/rite card on 3505 










Cord Reader 




EDBPNER 


1.. 


Punch error 






EDBMESG 




Pending message 






EDBDI 
EDBCH9 


1 


EDB includes device independence 




Channel 9 






EDBCH 12 


.1 


Channel 12 


iu 




EDBCH9B 




Channel 9 with dual feed carriage 


5 




EDBCHI2B 


...1 .... 


Channel 12 with dual feed carriage 


lo 




EDBCH 1 


.... I... 


Channel 1 


2 




EDBNCM 


I.. 


No carriage motion 


J, 




EDBMESG 


I. 


Pending message 


3 




EDBDI 


I 


EDB includes device independence 


? 



EDB FLAGBYTES LAYOUT (. . . .Conf d) 



Displacement 


Field name 






Field description 


Dec Hex 


uyico 




EDBREQPK 


1 


Enable/disable 


^ 




EDBREQST 


.1 


Request stored 


M 




EDBCNCL 




Cancel 


P? 




EDBMESG 
EDBLSTBK 


.... '.'.v. 

1 


Pending message 




Last EDB 






EDBDEVB 


.1 


Device busy 






EDBDEVi 




Device-end interrupt pending 






EDBREQl 


...1 .... 


First request 


o 




EDBCTLL 


.... 1... 


Long control operation 


<l 




EDBCEIN 


1.. 


Channel-end interrupt pending 


^ 




EDBDELN 


1. 


Delay on 




15 F 


EDBDELY 
EDBFLAG2 


1 


Delay off 




M20 lOC/SC indicators for: 






EDBCHBIT 


1 


Chained IOC operation 






EDBPGCHK 


.1 


IOC program check 






EDBSCFT 


..1 


S/370 device has scan feature 






EDBRDAH 


..1 


Read ahead (IOC) 






EDBOPEN 


...1 .... 


DOS disk pack representing 
M20 disk pack is open 






EDBCTOPT 


.... 1... 


Non standard disk count field found 
in M20 core during a write count 
and data or verify count and data 
operation 






EDBUCBIT 


1.. 


Unit check on S/370 device during 
tape operation 






EDBSNSDN 


1. 


Sense done for file protect (IOC) 






EDBFILDPR 


1 


Tape in file protect (IOC) 






EDB WD ATA 


1 


Previous Write data set 




36 24 


EDBDIST 

EDBDITP 
EDBDIDK 


1 

.1 


Device independence 

Generated for tape 
Generated for disk 






EDBDIACT 




.1 


Active on tape 






EDBDIAD 




..1 .... 


Active on disk 






EDBIOPN 




... 1... 


File opened 






EDBFNRD 




... .1.. 


Read 






EDBFNPN 




1. 


Punch 






EDBFNPT 




1 


Print 




37 25 


EDBDIST2 

EDBDICHG 
EDBSIZ 
EDBDISS 
EDDIMFC 


1 

.1 

..1 

...1 .... 


Device independence indicators 

MFCM emulated by two 3525's 
Input record size is 80 
Select stacker 2 
MFCM emulated by MFCM 





INTER - ROUTINE LINKS FOR COMMUNICATION ROUTINES 





^ dilcount 




ilSTR 
emulated 
instr trace 


^ 


load & call ^ 










V 
















IISHCcr 

communication 

control 


IISHFlor2 








k 


IISINeir 
emulator 
interrupt 

routine 


on a comm req ^ 






^t completion 




DIL 


at comm compi 






IISHCeir 


IISHFfs 
function scan 


—> 


B transient 


interrupt 


w 








to request an interrupt 


iTSHCTk "" 
interrupt 
key routine 














































DOS/VS 
supervisor 







External interrupt (Interrupt key or 
Attn MSG command) 



INTER - ROUTINE LINKS - Except communication routines 




W Trap points when using 
the EDF command 



HFUNTAB ENTRIES 



Routine 


Control 

Statement 

Handled 




Entry 


in HFUNTAB for this routine 




Displacement 
in HFUNTAB 
of entry 

Dec Hex 


Bytes 1-2 

Routine 

Identifier 

(in Hex) 


Byte 3 
Displacement 

in 
Branch table • 

Dec Hex 


Byte 4 


Byte 5 


Byte 6 


Displacement in HFUNTAB of entry for 
routine to be called when: 


return code= 


return code= -1 


return code= -2 


IISHFIN 




HF 


4 4 


194 (C2) 
OISHFMSG) 


205 (CD) 
(IISHCCR) 


208 (DO) 
(IISHCEIR) 





IISHFCMR 




HF 


12 C 


205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




6 6 


IISHFS 


S 


HF 


24 18 


200 (CB) 
(IISHFEX) 


208 (DO) 
(IISHCEIR) 


194 (C2) 
(IISHFMSG) 


11 OB 


$$BIISLE 


EOJ 


LE 


8 8 


194 (C2) 
(IISHFMSG) 


180 (B4) 
(IISDIBF) 




17 11 


$$BIISTS 


1 


TS 


8 8 


205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




22 16 


$$BIISCF 


CF 


CF 




205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




27 IB 


IISHFSK 


RCC keyword 
scanning 


HF 


16 10 


32 (20) 
($$BIISTS) 






32 20 


$$BIISTS 


RCC 


TS 





205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




36 24 


$$BIISLE 


SR 


LE 


4 4 


205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




41 29 


IISHFCP 


CP 


HF 


28 IC 


205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




46 2E 



HFUNTAB ENTRIES (....Cont'd) 



Routine 


Control 

Statement 

Handled 




Entry 


in HFUNTAB for this routine 




Displacement 
in HFUNTAB 
of entry 

Dec Hex 


Bytes 1-2 

Routine 

Identifier 

(in Hex) 


Byte 3 
Displacement 

in 
Branch table • 

Dec Hex 


Byte 4 


Byte 5 


Byte 6 


Displacement in HFUNTAB of entry for 
routine to be called when: 


return code= 


return code= -1 


return code= -2 


IISHFSK 


LD keyword 
scanning 


HF 


16 10 


55 (37) 
(SSBIISLE) 






51 33 


$$BIISLE 


LD 


LE 





208 (DO) 
(IISHCEIR) 


194 (C2) 
(IISHFMSG) 


180 (B4) 
(IISDIBF) 


55 37 


IISHFDIC 


HELP 


HF 


32 20 


61 (3D) 
(SSBIISPR) 


66 (42) 
($$BIISDP) 




61 3D 


$$BIISPR 


HELP (exept for 
device indep.) 


PR 




194 (C2) 
(IISHFMSG) 






66 42 


$$BIISDP 


HELP (for dev. 
independence) 


DP 




194 (C2) 
(IISHFMSG) 






70 46 


IISHFSK 


CCT keyword 
scanning 


HF 


16 10 


78 (4E) 
(SSBIISCC) 






74 4A 


$$BIISCC 


CCT 


CC 




205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




78 4E 


IISHFSK 


CS keyword 
scanning 


HF 


16 10 


87 (57) 
($$BIISCS) 






83 53 


$$BIISCS 


CS 


CS 




205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




87 57 


IISHFSK 


DF keyword 
scanning 


HF 


16 10 


96 (60) 
(SSBIISDF) 






92 5C 



HFUNTAB ENTRIES (....Cont'd) 



Routine 


Control 

Statement 

Handled 




Entry 


•n HFUNTAB for this routine 


Displacement 
in HFUNTAB 
of entry 

Dec Hex 


Bytes 1-2 

Routine 

Identifier 

(in Hex) 


Byte 3 
Displacement 

in 
Branch table* 

Dec Hex 


Byte 4 


Byte 5 


Byte 6 


Displacement in HFUNTAB of entry for 
routine to be called when: 


return code= 


return code= -1 


return code= -2 


$$BIISDF 


DF 


DF 




205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




96 60 


IISHFSK 


TS keyword 
scanning 


HF 


16 10 


105 (69) 
($$BIISTS) 






101 65 


$$BIISTS 


TS 


TS 


4 4 


205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




105 69 


IISHFSK 


DK keyword 
scanning 


HF 


16 10 


114(72) 
($$BIISTD) 






110 6E 


$$BIISTD 


DK 


TD 


4 4 


205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




114 72 


IISHFSK 


TP keyword 
scanning 


HF 


16 10 


123 (7B) 
($$BIISTD) 






119 77 


$$BIISTD 


TP 


TD 





205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




123 7B 


IISHFSK . 


UR keyword 
scanning 


HF 


16 10 


132 (84) 
($$BIISUR) 






128 80 


$$BIISUR 


UR 


UR 




205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




132 84 


IISHFSK 


EC keyword 
scanning 


HF 


16 10 


141 (8D) 
($$BIISTD) 






137 89 



HFUNTAB ENTRIES (. . . .Cont'd) 



Routine 


Control 

Statement 

Handled 




Entry 


in HFUNTAB for this routine 




Displacement 
in HFUNTAB 
of entry 

Dec Hex 


Byte 1-2 
Routine 
Identifier 

(in Hex) 


Byte 3 
Displacement 

in 
Branch table* 

Dec Hex 


Byte 4 


Byte 5 


Byte 6 


Displacement in HFUNTAB of entry for 
routine to be called when: 


return code= 


return code= -1 


return code= -2 


SSBIISTD 


EC 


TD 


8 8 


205 (CD) 
(IISHCCR) 


194(a) 
(IISHFMSG) 




141 8D 


IISHFSK 


EDF keyword 
scanning 


HF 


16 10 


150 (96) 
(IISEDF) 






146 92 


IISEDF 


EDF 


HD 




205 (CD) 
(IISHCCR) 


194 (a) 

(IISHFMSG) 




150 96 


$$BIISCT 


CNT 


a 




205 (CD) 
(IISHCCR) 


194 (a) 

(IISHFMSG) 




155 9B 


IISHFSK 


Dl keyword 
scanning 


HF 


16 10 


164 (A4) 
($$BIISDI) 






160 AO 


$$BIISDI 


Dl 


Dl 




205 (CD) 
(IISHCCR 


194 (a) 

(IISHFMSG) 


180 (B4) 
(IISDIBF) 


164 A4 


IISHFSK 


DIA keyword 
scanning 


HF 


16 10 


174 (AE) 
(SSBIISAS) 






170 AA 


$$BIISAS 


DIA 


AS 




205 (CD) 
(IISHCCR) 


194 (a) 

(IISHFMSG) 


(180 (B4) 
(IISDIBF) 


174 AE 


IISDIBF 




HB 




205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




180 B4 


IISHFSK 


CD keyword 
scanning 


HF 


16 10 


189 (BD) 
($$BIISCD) 






185 B9 



HFUNTAB ENTRIES (....Cont'd) 



Routine 


Control 

Statement 

Handled 




Entry 


in HFUNTAB for this routine 


Displacement 
in HFUNTAB 
of entry 

Dec Hex 


Byte 1-2 
Routine 
Identifier 

(in Hex) 


Byte 3 
Displacement 

in 
Branch table • 

Dec Hex 


Byte 4 


Byte 5 


Byte 6 


Displacement in HFUNTAB of entry for 
routine to be called when; 


return code= 


return code= - 1 


return code= -2 


$$BIISCD 


CD 


CD 




205 (CD) 
(IISHCCR) 


194 (C2) 
(IISHFMSG) 




189 BD 


IISHFMSG 




HP 


20 14 


205 (CD) 
(IISHCCR) 


200 (C8) 
(IISHFEX) 


211 (D3) 
($$BIISLE) 


194 C2 


IISHFEX 




HP 


8 8 


208 (DO) 
(IISHCEIR) 


205 (CD) 
(IISHCCR) 




200 C8 


IISHCCR 




HC 










205 CD 


IISHCEIR 




HC 










208 DO 


$$BIISLE 




LE 


12 C 








211 D3 



For routines with a HF identifier, the branch table is HFRTNTAB (contained in IISHF) 
For routines with a LE identifier, the branch table is LDBRANCH (contained in $$BIISLE) 
For routines with a TD identifier, the branch table is TDTAB (contained in $$BIISTD) 

For routines with a TS identifier, the branch table is TSTAB (contained in $$BIISTS) 



R8 contains a return code 

R7 = HFBRTAB points to HFRTNTAB 

R9 = HFUNCPTR points to HFUNTAB 



PROBLEM DETERMINATION AIDS 



Dynamic Service Aids (Depend on emulator generation option) - See notes 



FORMAT OF COMMANDS 

DF TD=(X'hhhh',X'hhhh') emulated core dump 

ED= (X'hhhhhh',X'hhhhhh') emulator core dump 

TT emulated instruction trace 

TTS trace stop 

EDF IOT=(d,xct) Unit record 

IOT= (n,st) Disk or tope 

IOT=(X'hh',st) id 

IOTS= y stop list 

d= device 

x= list of emulator control blocks before and after execution of XIO 

c= list of emulator control blocks before and after execution of CIO 

t= list of emulator control blocks before and after execution of TIO 

n= 1 to 4, M20 disk storage address 

hh= 01 to FF, M20 magnetic tape address 

3= list of emulator control blocks before and after execution of Start I/O 

t= list of emulator control blocks before and after execution of Test I/O 

Notes: 

You con code TT only if you hove coded DEBUG=TT or lOT in the EM20CPU 
macro instruction. 

You can code EDF only if you have coded DEBUG= lOT in the EM20CPU 
macro instruction. 



INFORMATION OUTPUT 

TD 1st line : 360/20 GPR's 8 to 15 

2d line : 360/20 old PSW, 360/20 new PSW, stacker info, CSW 
next lines : core contents 

ED line 1-2 : S/370 GPR's to 15 
next lines : core contents 

TT on the same line: 

A (instruction in process) 

instruction 

current 360/20 PSW 

360/20 GPR's 8 to 15 

360/20 old PSW 

360/20 new PSW 

360/20 CSW 



lOT See table on next page. 



PROBLEM DETERMINATION AIDS (. . . .Cont'd) 





Trace fields shown before (B) and after (A) execution 
of Model 20 I/O instruction 




Unit Record 


Tape 


Disk 




CIO 
XIO 


TIOB 


SIO 


TIO 


sio' 


SI02 


TIO 


S/370 registers 


B A 


B A 


B A 


B A 


B A 


B 


B A 


M20 registers 


B A 




B A 


B A 


B A 


B 


B A 


M20 instructions 


B A 


B A 


B A 


B A 


B A 




B A 


M20PSW 


B A 


B A 


B A 


B A 


B A 


B 


B A 


CRIOAa 


B A 


B A 


B A 


B A 


B A 


B 


B A 


CRINTFLG 


B A 


B A 


B A 


B A 


B A 


B 


B A 


EDB 


B A 


A 


B A 


B A 


B A 


B 


B A 


CCB 


B A 




A 


A 


A 


B 


A 


CREMUIND 


B A 








A 


B 




S/370 CCW 


A 




A 




A 


B 




M20CCW 






B A 


B A 


B A 




B A 


M20CSW 






A 


A 


A 


B 


A 


Communication region 
disk fields 










A 


B 




Disk count area 










B 






1 A routine other than 1 


SDD has control 




2 IISDD has control 







EMULATOR ROUTINE IN ERROR 

If an emulator message has been issued, the explanation should give some idea as to 
the nature of the error. The PLM lists all the routines that can issue a particular 
message. 

When an abnormal DOS/VS termination occurs, the DOS/VS PSW and GPR's are 
located in the communication region at CRSAVCPU. 

Use: • the address of the interrupted PSW 

• the contents of registers 4, 14, 15 

• the linkedit map 

COMMUNICATION REGION 



• GPR 3 should point to it, which is on a 256 byte boundary 

• If GPR 3 does not point to the communication region, locate IISCR in the linkedit 
map; it is located at the next upper 256 byte boundary address 



PROBLEM DETERMINATION AIDS (. . . .Cont'd) 



EMULATED MOD 20 MAIN STORAGE 

Beginning address : CRMAPORG 
Ending address : CRMAPEND 
M20 main storage is bounded at the end by 98xxxxxx 

CONTROL BLOCKS AND BUFFERS 

• EDB's addresses : CRDEVTAB 

• If M20 disks are emulated and device independence option is chosen at emulator 
generation, EDB's addresses are in the CSECT IISEDBCS 

• If they are not, the EDB's for unit record devices are moved to the communication 
region at Initialization time. Should there not be enough space, any remaining 
EDB's are generated in a separate CSECT (IISEDBCS) 

• Pointers in EDB's locate CCBS and DTFS 

• CCB or DTF for emulated disks are found in the first fullword of the EDB 

• For device independence: 

Four fullwords in an extension of the EDB point to the DTFMT's and DTFSD's. 
The address of the buffer for the device is found in its EDB 

REGISTER USAGE AND NAMES 



Register 1 


CCBREG 


pointer to DOS CCB 


Register 2 


EDBPNT 


pointer to EDB 


Register 3 


COMREG 


pointer to the communication region 


Register 4 


BASOP 


Base register 


Register 5 


EFFADDl 


M20 operand 1 address 


Register 6 


EFFADD2 


M20 operand 2 address 


Register 7 


MODIFIER 


M20 Instruction length or immediate field 


Register 14 


LINK 


return address 


Register 15 




used as a base register for all B transient emulator 
routines 



DIL macro Instruction sets registers 4, 5, 6 and 7 before giving control to an emulator 
routine 



EMULATOR DUMP 



The following items can be found in COMREG : 

• M20 address (i.e. relocation factor) CRMAPORG 

• Contents of M20 registers 8 to 15 CRSAVM20 

• M20 PSW (address of the current Instruction) CRM20PSW 

• First two bytes of the previous M20 instruction CRBYTE12 

• The contents of the l-recall register CRIRCAL 



MODEL 20 SECTOR TO SYSTEH/370 DISK RECORD CORRESPONDENCE 



Model 20 record 



S/370 record 



I Count Area | | Record Areo | | 



|HA| Record | | Count Area | \ Key Area | | Data Area | |Data Record 2 



Data Record 1 



MODEL 20 STANDARD MAIN STORAGE COUNT FIELD 



Byte 









Cylinder 
Address 





Head 
Address 


Record 
Number 





Data Length 270 



diname : confrol among device independence roufines, message processing, control card processing, 

DTFDAs for DPS files with verify, DTFCN, DTFDI,and DIMOD for SYSLST and SYSIPT, DAMOD 

dinamel : DTFDAs for DPS files with verify specified 

diname2 : DPS file initialization, DPS VTOC and volume processing, and documentation 

dinameS : SAM file processing, DTFSDs, SDMODFO (forward) 

diname4 : SDMODFI (backward only) 

dinameS : DTFDAs, DAM processing 

dinamed : DTFIS (load), ISMOD (load), forward 



Phase 
'diname' 


diname? : DTFIS (retrieve), ISMOD (retrieve), backw 


ard 




II SMS 
IISMSG 
IISCG 
IISMD 




Phase 
'dinamel ' 








IISFn 


Pk«.» 




1 llSVn \ 








•diname2' 












IISSC 

IISSCV 

IISSCI 






llSCn 










Phase 
dinameS' 




Phase 
'diname6' 




Phase 
'dincmeZ' 




USDS 




IISIF 

IISILn 

IISML 




IISIB 
IISIRn 
IISMR 


IISTK 

IISTKC 

IISTKE 

IISEQ 

IISTKI 






Phase 'dinameS' 






IISDA 
IISTn 




IISSQ 
llSSn 


Phase 'diname 


54' 




II SMI 


lllSMOl 





DATA INTERCHANGE COMMUNICATION REGION 






(0) 


4 


(4) 


8 


(8) 


12 


(C) 


16 


(10) 


20 


(14) 


24 


(18) 


28 


(IC) 



Operotfon communicaHor 


control block (CRHCB) 




A (card buffer) 


CRHBFCDA 


A (print buffer) 


CRHBFPRA 


A (DTFCN) 


CRHDFCNA 


a'(dtfdi SYSLST) 


CRHDFDIA 


, CRHMSGN 


, CRHPMSGN 


A (beginning of variable 


data in card buffer) CRHVADD 


^ CRHIMSGN 


^ CRHFLAGS 


CRHFLP2 


CRHSCMSG 


CRHREPLY 


CRHERTYP 


not used 



36 
40 



(20) 
(24) 



Generation control block (CRGCB) 



Program name 



first blankSfp^m^^name |.CRGDEV20 |^CRGDEVDS 



44 
84 



96 
100 

104 

108 

112 

116 

120 

124 





Control cards bic 


ck (CRCCB^ 






(2C) 
(54) ^ 


CRCFLID 
' M20 file identifier 


(58) 


CRCFLNM 




{5C) 


File name for DOS representing a DPS file 




(60) 


CRCFDOS 






(64) 


File name for DOS file 


not used 


(68) 


CRCFLNP 
fir^t blank in CRCFLNM 


• CRCNEXPD 


(6C) 


CRCNEXPD 

• 


System date YDD CRCSYSD 


(70) 


CRCDDDM 
days in system year 


^ CRCTVNBR 


(74) 


CRDBLK new block size for DOS file 1 


(78) 


^ CRCYLXVN 


^ CRCDFLVN 


(7C) 


, CRCDDELP ISAM 


.^^°^^'^SAM 


• CRCOPT 

• CRCINDIC 



For further explanation see the end of the table 
IV- 35 



DATA INTERCHANGE COMMUNICATION REGION (... .Cont'd) 



Data interchange structure block (CRCSB) 
1 . locates DTFs 
2. gives buffer allocation before execution; 



(80) 
(84) 
(88) 
(8C) 
(90) 
(94) 
(98) 
(9C) 
(AO) 
(A4) 
(A8) 



A (llSSn) DTFSD DOS file 


CRSDDFSD 


A (IISTn) DTFDA DOS file 


CRSDDFDA 


A (ISEQ parameter table) 


CRISPTR 


A(IISLn) DTFIS load DOS file 


CRSDFISL 


A (IISRn) DTFIS retrieve DOS file 


CRSDFISR 


A (CRSBUFSC3) 


CRSECTA 


A (current DTF for DOS file) 


CRSDDFA 


A (first DTFDA for M20 file) 


CRSMDFAl 


A (current DTF for M20 file) 


CRSMDFP 


A (second DTFDA for M20 file) 


CRSMDFA2 


A (third DTFDA for AA20 file) 


CRSMDFA3 



Data interchange structure block (IRSCB) 



during execution: 



128 


(80) 


132 


(84) 


136 


(88) 


140 


(8C) 


144 


(90) 


148 


(94) 


152 


(98) 


156 


(9C) 


160 


(AO) 


164 


(A4) 


168 


(A8) 



A (DPS block area) 


CRSMBA 


A (work area DPS cylinder index) 


CRSMCYWA 


A (ISEQ parameter table) 


CRISPTR 


A (work area DPS track index) 


CRSMTKWA 


• 


CRDOSIA 


A (CRBUFSC3) 


CRSECTA 


A (DOS DTF) according to selected 


CRSDDFA 


• 


CRSMDFAl 


A (current DTF for M20 file) 


CRSMDFP 


• 


CRSCYDFA 


• 


CRSOVDFA 



• For further explanation see the end of the table 
IV -36 



DATA INTERCHANGE COMMUNICATION REGION (... .Cont'd) 



File control block (CRFCB) (file identification part) 

Has the same format as the M20 standard file label from bytes 0-92 



172 (AC) 



212 


(D4) 


216 


(D8) 


220 


(DC) 


224 


(EO) 


228 


(E4) 


232 


(E8) 


252 


(FC) 


256 


(100) 


260 


(104) 


264 


(108) 



S CRFFLID ^ 
DPS file identification 


format 
identifier 






file serial numb 


CRFFSNBR 
er 


CRFVSNBR 
vol. seq. nmbr 


CRFVSNBR 


creation date CRFCRTD 


expiration date CRFEXPD 


CRFEXTCN 


*; not used 








file type 


CRFILTYP 




block length 


CRFBLKLG 


record length CRFRECLC 


CRFKEYLG 
key length 


CRFKEYLC 
key loc 


CRFKEYLC 









File control block (extent inform ation part) (CRECBEXT), same as Fl 



and F2 label, 10 bytes by extent 12 entries 
(max. nmbr of extents) 



268 
272 



(IOC) 
(110) 



388 (184) 



392 


(188) 


396 


(18C) 


400 


(190) 


404 


(194) 


408 


(198) 



CRFEXNBR 
seq. number 



CCHH lower limit 



CCHH upper limit 



save area for cylinder index extent 



CRFEXSTN 
first sector in extent 



CRFEXPTR 
lurrent extent 1 to 12 



CRFEXEDN 
last sector in extent 



CRFEXUP 
number of extents from Ibl 



CRFBFPT (next extent to be moved in CRECBEXl 



remaining extents CRFEXCHK 



e For further explanation : see end of the table 
IV -37 



DATA INTERCHANGE COMMUNICATION REGION (.. ..Cont'd) 



File control block , VTOC informaMon part (CRFCBVT) 



412 (19C) 
416 (lAO) 
420 (1A4) 



Processing of the M20 VTOC lab 


el 


410 (19A) 


CRFLEXLW 
firet sector (DPS VTOC) 


last sector CRFCEXUP 


CRFFMTl 
first sector DPS Fl label 


CRFCVTOC 
VTOC sector being processed 


CRFVOLN 
DPS vol being processed 


VTOC 
• indicators 





428 


(lAC) 


432 


OBO) 


436 


(1B4) 


440 


(1B8) 


444 


(IBC) 


448 


OCO) 


452 


(1C4) 


456 


(1C8) 


460 


OCC) 


464 


(IDO) 


468 


(1D4) 


472 


(1D8) 



File control block, documentation part (CRFCBDOC) 
Fields used in processing DPS files documentation 



^ CRFVBLK 
block size max. allowed 



CRFDOFLG 
offset last record 



key length 



CRFTRKC 
Dos file track capacity 



CRFMSTK 
sectors / tracks 



CRFDKYLG DOS tracks required CRFTRKN 



number of records processed (DOS or DPS) CRFDRCC 



number of records left (extents too small) 



CRFDORCC 



CRFDOCLP 
extents-print line 



Vol . ser. number current DPS volume 



record size (current DPS file) 



block size current DPS file 



max. block size for the device (DOS) 



DOS block size specified or default value CRFDPSPBK 



, CRFVDIND not used 



• For further explanation : see end of the table 



DATA INTERCHANGE COMMUNICATION REGION (... .Cont'd) 



File control block, file conversion part 



476 


(IDC) 


480 


(lEO) 


484 


0E4) 


488 


(1E8) 


492 


(lEC) 


496 


(IFO) 


500 


(1F4) 


504 


(1F8) 


508 


(IFC) 


512 


(200) 


516 


(204) 



(Fields related to forward and bac 


cward copies) 






, CRFDASTN 


CRFDAEDN 
end of data area sector 


CRFBNSCB 
number of sectors in DPS block 


CRFBNRCB 
DPS blocking factor 


CRFBFSCB 
beginning of DPS block 


CRFBLSCB 
end DPS block 


CRDNRCB 
DOS blocking factor 


CRMERBYT 


CRDERBYT 


trxjck reference in DTFDA for DPS file CRFMREF 


track reference in DTFDA for D 


OS file CRFDREF 


CRFDKEY 

• 


A (first prime data track) 


CRVF2D4 


CRVF2D6 
overflow tracks 


CRVF2ADR 
sector number of F2 label 


CRFDNTRK 
rec/track 


• 


• 





I 



520 


(208) 


596 


(254) 


600 


(258) 


720 


(2 DO) 


724 


(2D4) 


852 


(354) 


856 


(358) 


988 


(3DC) 


992 


(3E0) 


1124 


(464) 


1128 


(468) 


1260 


(4EC) 



Buffers 




_J 


""card buffer 


CRBUFCD 




1 . CRBUFDEL 


"print buffer 


CRBUFPR 


^ 


ASA char 1 


CRBUFSCl 


? 


"VTOC buffer part 1 


VTOC buffer part 2 


CRBUFSC2 


? 


1 


DPS sector buffer part 1 


CRBUFSC3 


? 


1 


? 


DPS sector buffer part 2 


CRBUFSC4 


1 







» For further explanation see the end of the table 
IV -39 



DATA INTERCHANGE COMMUNICATION REGION FLAG BYTE LAYOUT 



Displacement 


Field 


Bytes 


Field description 


Dec 


Hex 








16 


C 


CRHMSGN 


2 


Internal number of next priority 1 
message 


24 


18 


CRHIMSGN 


2 


Internal number of entry in message 
directory 


26 


lA 


CRHFLAGS 


1 


Message flags 






CRHTYI 


10000000 


Information 






CRHTYD 


01000000 


Decision 






CRHTYA 


00100000 


Action 






CRHTYB 


00001000 


Automat! c EOJ 






CRHTYC 


00000100 


Another to be printed 






CRHTYP 


00000010 


Message on printer keyboard 






CRHTYS 


00000001 


Message on SYSLST 


27 


IB 


CRHFLP2 


1 


Flogs for priotity 2 messages 






CRHERMSG 


00000010 


Invalid response to action or 
decision message 






CRHPRMSG 


00000001 


HELP entered 


28 


IC 


CRHSMSG 


1 


Screening mask for message directory 






CRHSCVRY 


10000000 


Any reply is valid 






CRHSCEOJ 


01000000 


EOJ is valid 






CRHSCSKP 


00100000 


SKIP is valid 






CRHSCIGN 


00010000 


IGN is valid 






CRHSCRTY 


00001000 


RETRY is valid 


29 


ID 


CRHREPLY 


1 


Reply made by operator 






CRHRPVRY 


10000000 


Other than EOJ, SKIP, IGN, RETRY 






CRHRPEOJ 


01000000 


EOJ 






CRHRPSKP 


00100000 


SKIP 






CRHRPIGN 


00010000 


IGN 






CRHRPRTY 


00001000 


RETRY 


30 


IB 


CRHERTYP 


1 


Control card error type 


42 


2A 


CRGDEV20 


1 


DPS device specified at generation 






CRGM2011 


10000000 


2311 






CRGM20I4 


01000000 


2314 or. 2319 






CRGM2030 


00100000 


3330 






CRGM2040 


00010000 


3340 


43 


2B 


CRGDEVDS 


1 


DOS device specified at generation 






CRGDOSll 


10000000 


2311 






CRGDOS14 


01000000 


2314 or 2319 






CRGDOS30 


00100000 


3330 






CRGDOS40 


00010000 


3340 


106 


6A 


CRCNEXPD 


3 


New expiration date for M20 file YDD 


114 


72 


CRCTVNBR 


2 


Number of DPS volume to be processed 


120 


78 


CRCYLXVN 


2 


ISAM, DPS volume that contains the 
cylinder index. Default value is one 


122 


7A 


CRCDFLVN 


2 


ISAM, DPS volume that contains the 
independent overflow. Zero if no 
overflow area. 


124 


7C 


CRCDELP 


2 


ISAM copy. Position of delete byte 
in record zero if no record deletion 


126 


7E 


CRDDELID 


1 


ISAM copy. Delete byte, X'FF' is 
default. 



DATA INTERCHANGE COMMUNICATION REGION FLAG BYTE LAYOUT (. . . .Cont'd) 



Displacement 


Field 


Bytes 


Field description 


Dec 


Hex 








127 


7F 


CRCOPT 


Half byte 


Options 






CRCFWCY 


1000 


Forward 






CRCBWCY 


0100 


Backward 






CRCFDOC 


0010 


File documentation 






CRCVDOC 


0001 


Volume documentation 






CRCINDIC 


Half byte 


Indicators 






CRCVRFY 


1000 


Verify specified 






CRUISF 


0100 


UIS Card 


144 


09 


CRDOSIA 


4 


A(DOS lOAREA) for SAM and DAM 
or DOS WORKL for ISAM forward 


156 


9C 


CRSMDFAl 


4 


ISAM: 

A (DTF to process prime data area 

extent) 

Other file: 

A (DTF to process the extent) 


164 


A4 


CRSCYDFA 


4 


Non Isam file: 

points to DFDA addressed by 

CRSMDFAl 

ISAM Multivolume: 

A (DTFDA to process the cylinder index 

extent) except if cylinder index and 

independent overflow ore on the same 

volume 


168 


A8 


CRSOVDFA 


4 


ISAM file: 

A(DTFDA to process independent 

overflow extent 

A(DTFDA to process the independent 

overflow extent and the cylinder index 

extent) if they are on the same volume 


254 


FE 


CRFILTYP 


2 


File type 






CRFISEQ 


X'8000' 


ISAM 






CRFSEQ 


X'4000' 


SAM 






CRFDA 


X'2000' 


DAM 


266 


lOA 


CRFEXTYP 


1 


Extent type 






CRCYLTYP 


00000100 


Cylinder extent 






CROVTYP 


00000010 


Overflow area 






CRPDTYP 


00000010 


Prime data or consecutive area 


420 


1A4 




1 


VTOC indicators 


CRFVTOCF 


10000000 


First half of DPS sector being processed 










(bit 1 = indicates second half) 






CRFVTOCE 


OlOOOOOO 


End of DPSVTOC has been encountered 






CRFVNOFl 


00100000 


No format 1 label 






CRFVNOF3 


00010000 


No format 3 label 






CRFVOLNB 


00001000 


Incorrect volume number 






CRVOLFl 


00000100 


NextFl label to be read 






CRVOLF3 


00000010 


Next F3 label to be read 






CRINITSW 


00000001 


File to be opened (DPS file initialization) 


472 


IDS 


CRFVDIND 


1 


Documentation indicators 






CRFVDR2H 


10000000 


DPS record size greater than track 
capacity 






CRFVDB2H 


OlOOOOOO 


DPS block size greater than track 
capacity 






CRFVDBDH 


00100000 


DOS block size greater than track 
capacity 






CRFVDBDM 


oooioooo'' 


DOS block size is not a multiple of 
DPS block size 






CRFYE^^IN 


Q0001000 


No extent found in Fl label 



DATA INTERCHANGE COMMUNICATION REGION FLAG BYTE LAYOUT (Conf'd) 



Displacement 


Field 


Bytes 


Field description 


Dec Hex 








474 1D4 


CRFDASTN 


2 


Sector number beginning of data area 
SAM=DPS cylinder ^ 
DAM= DPS extent , ^ 
ISAM= DPS prime data area 
data cylinder J 


488 1E8 


CRMERBYT 


2 


Error indicators from ERRBYTE DOS 
DTFDA defining the M20 file 


490 lEA 


CRDERBYT 


2 


Error indicators from ERRBYTE DOS 
DTFDA defining the DOS file 
(DAM only) 


500 1F4 


CRFDKEY 


8 


DOS file key (DA copy) which is the 
M20 ID (MBBCCHHR) 



Not e; GPRS points to the data interchange communication region. 
Problem determination aids; use the diagnostics facilities of DOS/VS 



The Dl Program is not dependent on the Hardware compatibility feature/ 7520 
and can run on any model supported by DOS/VS 



CHAPTER V 
14xx EMULATOR 



1401/1440/1460 AND 1410/7010 COMPATIBILITY FEATURE INSTRUaiONS 



1400 fetch, address trans- 
lation and indexing 



Branching to emulator 
routines for execution 
of. most 1400 operations 



COMP 

Performs the 1400 compare 
function, providing a 
6-bit compare, for the 
internal format used by 
the emulator 

This instruction is not 
provided with the high 
speed feature for Model 
135HS 



Moves 1400 data within 
emulated storage 



MULDIV (1401 only) 

Performs the 1400 multiply 
and divide instruction 

This instruction is provided 
only with the high speed 
feature for Model 135HS 



Assists in emulating 1400 
branch operations 



¥? V f f f V V 



B IF LAG 

Checks the AAR and BAR 

registers to make sure 

they contain valid 
addresses 

This instruction is treated 
as a no-operation with 
the high speed feature 
for Model 135HS 



ANUM 

Performs 1400 arithmetic 
operations (except 
multiply and divide) 



MIO 

Assists in emulating 1400 
input/output operations 
by moving data between 
buffers. System/370, and 
emulated 1400 core storage 

Converts data from EBCDIC 
to internal code and 
vice-versa 



Compatibility Feature Instruction Set 
High Speed Feature Instruction Set 



1401/1440/1460 AND 1410/7010 

HOW DIL INSTRUCTION FETCHES 1400 INSTRUCTION 




ENTRY N^ 
FOR A 



Return fo the com- 
patibility feature 
for interpretation 
of the instruction 
located by lAR 



1401/1440/1460 AND 1410/7010 

TAPES IN SPANNED FORMAT AND 1400 FORMAT 



DOS 
HEADER 
LABELS 



TAPE MARK 
RECORD 



TAPE MARK 
RECORD 



k 



TAPE MARK 
RECORD 



DOS TRAILER LABELS 



1400 FORMAT 

beginning 



TM = Tape mark BDW = Block descriptor word 

IRG= inter-record gap SDW = Segment descriptor word 



ly 



^ 


i 


1400 LABEL 


^ 


S 


■g 



1401/1440/1460 AND 1410/7010 

EMULATED 1400 CORE STORAGE IN SYSTEM/370 MAIN STORAGE ^ 




^ 


p. 






FF . FF , FF . FF , FF . FF . FF . FF 




ik||QCPORG(1401) 

!IRCPORG(1410) 

1 ^ 

EMULATED 1400 
CORE STORAGE c- 

1 ' 






















- ? 


- 






















III!.. 


V 




FF FF FF FF FF FF FF FF 






L 





IIQCPEND(1401) 
IIRCPEND(1410)' 



SYSTEM/370 BYTE 


1400 CHARACTER 





bit 8 


1 


bit 4 


2 


bit 2 


3 


bit 1 


4 


bit B 


5 


bit A 


6 


bit w 


7 


bit always 



EXAMPLE: 

CWBA8421 
in BCD format becomes: 

8421 BAWC 
in internal format. 



1401/1440/1460 AND 1410/7010 COMPATIBILITY FEATURE 



REGISTER 


BYTE 


BYTES 1,2 AND 3 


COMMENTS 


2 


Zero 




Zero 


Work register for 
compatibility feature 


3(COMREG) 


Zero for valid 
address 


Communication region 
base register 


Binary address of 
communication region 


4 (BAR) 


Zero forv 
address 


alid 


B - address register 


Binary address of 
current 1400 B - field 


5 (AAR) 


Zero for v 
address 


alid 


A- address register 


Binary address of 
current 1400 A -field 


6 (lAR) 


DILCNT 




1400 instruction 
counter 


Binary address of next 
1400 instruction to be 
fetched 


7(BAS0P) 


Control byte 


Emulation routine 
base register 


Binary address of 
emulation routine 



Contents of GPR 2 through GPR 7 used by the compatibility feature 



Emulator Unit Control Block (EUCB) 



One for each device to be emulated . 

Created at generation time, modified with emulator control 

statements. 

e SUB For tape drive and UR device. 

e DUB For each DA device. 

Followed by a disk extent table (DUBEXTPT) used 
to locate 1400 disks in CS format on S/370 disk pack 

e EMDTF Interface between DOS logical or physical IOCS 
and emulation routines of the emulator. 
Contains: CCW and CCB or DTFPH for the file, 
EOF indicator, parity, error indicator, data address. 



Emulator Channel Control Block (1410/7010 only) (ECCB) 



For each emulated 1400 channel. 

Contains: channel status indicator, device assignment table, EAR, 

FAR, GAR, or HAR 



1401/1440/1460 PROGRAM ORGANIZATION 



Emulator program overlay tree: 





IIQCROl 






HOURS 






IIQURl * 






IIQ14DEB 






IIQINECB 






IIQOJED 






IIQSDR 






IIQMWTR 






IIQOACON 






IIQOBCON 






IIQINHF 






IIQINEIO 


IIQSTR 




IIQCCPRO 


IIQCPA 




IIQCCCS 


IIQCPL 




IIQCCMOD 


HOC PC 




IIQIDCS 




IIQEIOCS 




IIQEJR 




IIQBFEIO 




IIQTPMLU 




IIQMTMOD 




IIQNTDOS 




IIQVTDOS 




IIQDSDOS 




IIQDSMOD 




IIQDICS 




IIQDKCS 




IIQCN 


The C SECTS below the horizontal 


IIQCNMOD 


line on the left of the figure are 


IIQIUDOS 


overlayed when the execution phase 


IIQEPE 


is loaded into System/370 main 


IIQMCE 


storage. Note that the order of the 


IIQAPA 


CSECTs in the figure is the onder 


IIQMDM 


in which they appear in main 


IIQCFFET 


storage. 


IIQBR 




IIQCFCAT 




IIQBY 




IIQURMOD 




1 


IIQINBF 



Emulator CSECTs (by function) 



Initialization 


CPU emulation 


I/O emulation 


Emulator 


Catalog and 










services 


fetch 


IIQINENT 


IIQCPA 


IIQURS 


IIQDSMOD 


IIQ14DEB 


IIQCFFET 


IIQINECB 


IIQCPL 


IIQIDCS 


IIQDICS 


IIQOJED 


IIQCFCAT 


IIQINHF 


IIQCPC 


IIQEIOCS 


IIQDKCS 


IIQSDR 




IIQINEIO 


IIQEPE 


IIQBFFIO 


IIQCN 


IIQMWTR 




IIQINBF 


IIQMCE 


IIQTPMLU 


IIQCNMOD 


IIQOACON 






IIQAPA 


IIQMTMOD 


IIQIUDOS 


IIQOBCON 






IIQMDM 


IIQNTDOS 


IIQURMOD 


IIQCCPRO 






IIQBR 


IIQVTDOS 


IIQURl * 


IIQCCCS 






IIQBY 


IIQDSDOS 




IIQCCMOD 

IIQSTR 

IIQEJR 





* Note: IIQURl is created if a carriage control tape is to be used on the S/370 printer 
(CARRCTL=NO) ^_^^ 



1401/1440/1460 DISK FORMAT 











n 
























PP bb 


LL bb 


EMUL 


SECTOR 1 




LL bb 


EMUL 


SECTOR20 


2164 00 


108 00 


CTL 


100 bytes 


}) 


108 00 


CTL 


100 bytes 










(( 









Format of a System/370 record representing a 1301 or 1311 track (sector mode) 



PP bb 
2992 00 


LL bb 
2988 00 


EMUL 
CTL 




TRACK 
2980 bytes 



Format of a System/370 record representing a 131 1 track (track mode) 



PP bb 

2555 00 


LL bb 
2551 00 


EMUL 
CTL 




TRACK 
2543 bytes 



Format of a System/370 record representing a 1301 track (track mode) 



PP bb 
1044 00 



LL bb 
208 00 



EMUL 
CTL 



SECTOR 1 
200 bytes 



Format of a System/370 record representing a 1405 track 



LL bb 
208 00 



EMUL 
CTL 



SECTOR 5 
200 bytes 



PP bb : The first two bytes contain the length of the System/370 physical 

record; the last two are set to zero. 

LL bb : The first two bytes contain the length of a System/370 logical 

record; the last two are set to zero. 

EMULCTL : This 4-byte field is set to zero except for the first bit of the 
first byte: 

Bit = , move mode 
Bit = 1 , load mode 

SECTOR AND TRACK : This field contains the 1400 data. 



Disk formdt 


Load mode 


Move mode 


1301 or 1311 sector 


90 


100 


mode 






1301 track mode 


2261 


2543 


1311 track mode 


2682 


2980 


1405 


176 


200 



Number of 1400 Characters in System/370 Disk Records 



1401/1440/1460 

1400 ADDRESSES AND CORRESPONDING MACHINE CODES 



ADDRESSES 
0000-3999 



ADDRESSES 
4000-7999 A -bit 
(O-Zone)over Units 
Position 



ADDRESSES 
8000-11999 B-bit 
(1 1 -Zone) over 
Units Position 



ADDRESSES 
12000-15999 AB-bits 
(12-Zone) over 
Units Position 



Addresses Codes 



Addresses Code; 



Addresses Codes 



Addresses Codes 



0000-0099 
0100-0199 
0200-0299 
0300-0399 
0400-0499 
0500-0599 
0600-0699 
0700-0799 
0800-0899 
0900-0999 



000-099 
100-199 
200-299 
300-399 
400-499 
500-599 
600-699 
700-799 
800-899 
900-999 



4000-4099 
4100-4199 
4200-4299 
4300-4399 
4400-4499 
4500-4599 
4600-4699 
4700-4799 
4800-4899 
4900-4999 



00x-09Z 
10X-19Z 
20X-29Z 
30X-39Z 
40X-49Z 
50X-59Z 
60X-69Z 
70X-79Z 
80X-89Z 
90X-99Z 



8000-8099 
8100-8199 
8200-8299 
8300-8399 
8400-8499 
8500-8599 
8600-8699 
8700-8799 
8800-8899 
8900-8999 



OOp-OOR 
10p-19R 
20p-29R 
30p-39R 
40p-49R 
50p-59R 
60p-69R 
70p-79R 
80p-89R 
90p-99R 



12000- 
12100- 
12200- 
12300- 
12400- 
12500- 
12600- 
12700- 
12800- 
12900- 



•12099 
■12199 
•12299 
■12399 
12499 
■12599 
•12699 
12799 
■12899 
■12999 



OOg-091 
10g-19I 
20g-29l 
30g-39i 
40g-49| 
50g-59| 
60g-69l 
70g-79i 
80g-89l 
90g-99l 



1000- 
1100- 
1200- 
1300- 
1400- 
1500- 
1600- 
1700- 
1800- 
1900- 



■1099 xOO- 
■1199 /OO^ 
■1299 SOO- 
■1399 TOO- 
■1499 UOO- 
■1599 VOO- 
■1699 WOO- 
1799. XOO- 
■1899 YOO- 
■1999 ZOO- 



-x99 
-/99 
■S99 
-T99 
-U99 
■V99 
■W99 
-X99 
•Y99 
•Z99 



-5099 
-5199 /Ox 
■5299 SOx. 
-5399 TOx^ 
-5499 UOx 
-5599 VOx^ 
-5699 WOx^ 
-5799 XOx- 
■5899 YOx 
■5999 ZOx 



9000-9099 
9100-9199 
9200-9299 
9300-9399 
9400-9499 
9500-9599 



x0p-x9R 
/0p-/9R 
S0p-S9R 
T0p-T9R 
U0p-U9R 
V0p-V9R 



13000- 
13100- 
13200- 
13300- 
13400- 
13500- 



-W9Z 9600-9699 W0p-WR13600- 



9700-9799 
9800-9899 
9900-9999 



X0p-X9R 
Y0p-Y9R 
Z0p-Z9R 



13700- 
13800- 
13900- 



■13099 x0g-x9l 
■13199 /0g-/9l 
13299 S0g-S9l 
13399 T0g-T9l 
■13499 U0g-U9l 
13599 V0g-V9l 
■13699 W0g-W9| 
13799 X0g-X9l 
■13899 Y0g-Y9I 
13999 Z0g-Z9l 



2000-2099 pOO- 
2100-2199 JOO- 
2200-2299 KOO- 
2300-2399 LOO- 
2400-2499 MOO- 
2500-2599 NOO- 
2600-2699 OOO- 
2700-2799 POO- 
2800-2899 QOO- 
2900-2999 ROO- 



6000-6099 pOx- 
6100-6199 JOx- 
6200-6299 KOx- 
6300-6399 LOx- 
6400-6499 MOx- 
6500-6599 NOx- 
6600-6699 OOx- 
6700-6799 POx^ 
6800-6899 QOx- 
6900-6999 POx^ 



10000- 
10100- 
10200- 
10300- 



M9Z 10400- 
N9Z 10500- 



-P9Z 



10900- 



10099 pOp- 
10199 JOp^ 
■10299 KOp- 
10399 LOp^ 
■10499 MOp- 
■10599 NOp^ 
10699 OOp^ 
10799 POp- 
10899 QOp^ 
■10999 ROp- 



14000- 
14100- 
14200- 
14300- 



M9R14400- 
N9R 14500- 



14900- 



14099 p0g-p9l 
■14199 J0g-J9l 
■14299 K0g-K9i 
14399 L0g-L9l 
■14499 M0g-M9l 
14599 N0g-N9l 
14699 O0g-O9l 
14799 P0g-P9| 
14899Q0g-Q9| 
14999 R0g-R9l 



3000-3099 
3100-3199 
3200-3299 
3300-3399 
3400-3499 
3500-3599 
3600-3699 
3700-3799 
3800-3899 
3900-3999 



g00-g99 
A00-A99 
B00-B99 
C00-C99 
D00-D99 
E00-E99 
F00-F99 
G00-G99 
H0O-H99 
100-199 



7000- 
7100- 
7200- 
7300- 
7400- 
7500- 
7600- 
7700- 
7800- 
7900- 



■7099 g0x-g9Z 
■7199 A0X-A9Z 
■7299 B0X-B9Z 
■7399 C0X-C9Z 
■7499 D0X-D9Z 
■7599 E0X-E9Z 
•7699 F0X-F9Z 
7799 G0X-G9Z 
■7899 H0X-H9Z 
■7999 10X-I9Z 



11000- 
11100- 
11200- 
11300- 
11400- 
11500- 
11600- 
11700- 
11800- 
11900- 



■11099 gOp- 
■11199 AOp- 
■11299 BOp- 
■11399 COp- 
11499 DOp- 
11599 EOp- 
11699 FOp- 
11799 GOp- 
11899 HOp- 
11999 iOp- 



15000- 
15100- 
15200- 
15300- 
15400- 
15500- 
15600- 



■G9RI5700- 
■H9R15800^ 



15099 g0g-g9l 
15199 A0g-A9i 
15299 B0g-B9| 
15399 C0g-C9l 
15499 D0g-D9i 
15599 E0g-E9| 
15699 F0g-F9i 
15799 G0g-G9l 
15899 H0g-H9I 
15999 iOg-191 



Note : The symbols 4= , ! and ? have been replaced by the letters x, p and g, respectively 
since this is the method of display on the 1052 Printer- Keyboard. 



1401/1440/1460 PROBLEM DETERMINATION AIDS 



D ynamic Service Aids, formaf of emulator commands ; 



IDENTIFI- 
CATION 


KEYWORD AND 
OPERANDS 


FUNCTION 


DISPLAY 


CONFIG 
ADDR=nnnnn 

XADDR=nnnnnn 

SENSE 

INQUIRY 

REG 

STATUS 

TAPE [=n] 

DISK [=n] 

UR 


Assignment of all I/O devices . 

40 Characters of 1400 core storage from 1400 decimal 
address nnnnn . WM are displayed as one underscore 
Word separator as 2 (~) . 

4 Full words of S/370 main storage data from hex 
address nnnnnn . 

Emulated sense switches from A to G . 

Inquiry indicator . 

lAR, AAR, BAR . 

Switches and lAR, BAR, AAR. 

Assignment of tape unit n . Default value is display all . 

Assignment of disk storage n. Default is display all. 

Assignment of all UR devices 


DEBUG 


ACTION=rSET ] 
< RESET> 
[nnnnnj 

TYPE= Tad STOP] 

<STEP } 

[trace J 


Emulates certain debugging functions. Only one is 
active at a given time. Next command cancels the 
effect of the previous one . DEBUG=YES must be 
coded in the EMSUP macro. 

SET= enables TYPE=SET or TYPE=TRACE 
RESET= disable TYPE action 
nnnnn= 1400 stop address 

ADSTOP= 1400 stop address emulation 
STEP= l/E Mode switch emulation 
TRACE= lists on SYSLST all 1400 instructions 
executod and AAR, lAR, BAR. 


DUMP 


FROM=o,TO=b 
XFROM=<i,XTO=b 


Dumps onto SYSLST the 1400 core storage or the 
S/370 main storage. Default value is all 1400 core 
storage dumped. DEBUG=YES must be coded in the 
EMSUP macro. 

1400 Core storage, a and b are decimal from 1 to 5 
digits long. Default value is all core dumped. 

S/370 Main storage, a and b are hex from 1 to 6 
digits long. Default value is all storage dumped. 


RETRY 




Used to reread a card that has fust been corrected. 
May be used only if 1400 cord are read on a 2540 or 
a 3505. 



I 



1401/1440/1460 PROBLEM DETERMINATION AIDS (....Cont'd) 

Emulator Routine in Error 

If an emulator message has been issued, the message explanation should give some 
idea as to the nature of the error. The Logic Manual lists all the routines that can 
issue a particular message . 

• Determine which 1400 instruction was being emulated at error time. 

• lAR normally points to the next 1400 instruction to be emulated . 

• Use lAR, program listing or dump to locate the 1400 instruction to be emulated. 

• The last 1400 I/O instruction emulated (M, L or U op-code) is stored at CCINSTSV. 

Communication Region 

GPR 3 should point to it which is on a 256 byte boundary (first 512 bytes are put on 
the same page) . 

• If GPR 3 does not point to the COMREG, locate IIQCR01 in the linkedit map. 
The COMREG is located at the next 256 byte boundary address. 

Emulated 1400 Core Storoge 

• Beginning address : CRMAPORG 
o Ending address : CRMAPEND 

• 1400 core storage is bounded at each end by a double word containing X'FF'. 

Control Blocks and buffers 

• Buffers and DTF's can be located using pointers in the SUB or DUB of the 
emulated device. 

9 To find a SUB or DUB, find a displacement in the device assignment table at 
CCASNDEV in the COMREG (displacement 8D0) and the address of the UCB 
address list at CMUCBLST (displacement 888). Using the value from CCASNDEV 
multiplied by 4, as an index, get the address of the corresponding SUB or DUB, 

or : When control has been given to I/O emulation and DOS interface routines, 
get the address of the SUB or DUB involved from GPR 9 , 

or : As the file name is in BCD in the SUB and DUB, find it in the dump between 
the COMREG and emulated 1400 core storage. 

1400 Registers 

The lAR, BAR, AARare maintained in S/370 binary format, use emulator commands 
DISPLAY=REG or DISPLAY=STATUS to display the contents of those registers. 



Note : COMREG stands for Communication Region . 



1401/1440/1460 TABLE OF REGISTER USAGE 



ROUTINE 


REGISTER CONTENTS AT ENTRY EMULATOR ROUTINES 


IIQEP 


Same as IIQAP 


IIQID 


3 - Address of communication region 




4 - BAR 




5 - AAR 




6 - lAR 




7 - Base register for this routine 




13 - Save area address provided by this routine 


IIQIU 


Same as IIQDS 


IIQMC 


Some as IIQAP 


IIQMD 


Same as IIQAP 


IIQMW 


- Address of variable text or zero 




1 - Message number of message to be issued 




13 - Address of caller's register save area 




14 - Return address 




15 - Entry point address 


IIQNT 


Same as IIQDS 


IIQOA 


- Address of variable text or zero, or length of operator's 




reply on return from IIQMW 




1 - Message number of message to be issued or address of 




operator's reply on return from IIQMW 


IIQOB 


- Length of the emulator command or control statement 




1 - Address of the emulator command or control statement 


IIQOC 


- Address of a parameter list 


thru 




IIQOK 




IIQTP 


3 - Address of communication region 




9 - Address of SUB 




13 - Address of caller's register save area 




14 - Return address 




15 - Entry point address and DILCNT intemjption indication 


IIQSD 


3 - Address of communication region 




13 - Address of caller's register. save area 




14 - Return address 




15 - Entry point address 


IIQST 


3 - Address of communication region 




7 - Base register for this routine 


HOUR 


3 - Address of communication region 




4 - BAR 




13 - Address of caller's register save area 




14 - Return address 




15 - Entry point address and DILCNT interruption indication 


IlQURl 


3 - Address of communication region 




4 - BAR 




9 - Address of printer SUB 




13 - Address of caller's register save area 




14 - Return address 




15 - Entry point address 



1401/1440/1460 TABLE OF REGISTER USAGE (....Conf'd) 



ROUTINE 


REGISTER CONTENTS AT ENTRY EMULATOR ROUTINES 


IIQVT 


Same as IIQDS 


IIQAP 


3 - Address of communication region 




4 - BAR 




5 - AAR 




7 - Base register for this routine 


IIQCN 


3 - Address oF communication region 




4 - BAR 




9 - Address of SUB 




1 4 - Return address 




15 - Entry point address 


IIQCP 


3 - Address of communication region 




4 - BAR 




5 - AAR 




7 - Base register for this routine 


IIQDI 


3 - Address of communication region 




4 - BAR 




5 - AAR 




9 - Address of DUB 




14 - Return address 




15 - Entry point address 


IIQDK 


Same as IIQDI 


IIQDS 


- Code indentifying function to be performed 




1 and 9 - Address of SUB 




3 - Address of communication region 


IIQEl 


- Code indentifying function to be performed 




1 - Address of SUB or DUB 



Note that the DILCNT, set by unit record and tape emulation routines 
for overlapped I/O operations, is in the seven leftmost bits of GPR6. 

The compatibility feature DIL instruction sets GPR 4, GPR5, GPR 6, 
and GPR 7 (BAR, AAR, lAR, and base register) before giving control 
to an emulator program routine. The compatibility feature also uses 
GPR 2 as a work register. 



Register usage remains the same throughout the execution of a given 
routine. In addition, note that GPR 15 is used for return codes by 
IIQEl, IIQDS, IIQIU, IIQMW, IIQNT, IIQVT, and IIQOC through 
IIQOI. 



1410/7010 PROGRAM ORGANIZATION 



Emulator program overlay tree: 

ilRINENT 

liRURS 

IIRCRC2 

IIRCRC1 

!IR14DEB 

IIRINECB 

MROJED 

iiRMWTR 

IIRSDROI 

liROACON 

IIROBCON 

IIRINHF 



IIRINEIO 
IIRCCPRO 
ilRCCMOD 



The CSECTs on the left of the 
figure, below the horizontal 
line, are overlayed when the 
execution phase is loaded into 
System/370 main storage. 



Emulator Program CSECT Layout 



IIRSTR 

IIRCP 

IIRFP 

IIRST 

II RPR 

IIRISDCS 

IIREIOCS 

ilREJR 

IIRBFEIO 

IIRTPMLU 

IIRMTMOD 

ilRNTDOS 

IIRVTDOS 

IIRDSMOD 

IIRDSDOS 

IIRDCC 

liRDKO 

IIRIUDOS 

IIRMIM 

IIRMIC 

IIRIS 

IIRURMOD 

IIRDK1 

IIRINBUF 



INITIALIZATION 


CPU EMULATION 


I/O EMULATION 


EMULATOR SERVICES 


IlRINENT 


IIRCP 


IIRURS 


IIROJED 


IIRINECB 


IIRFP 


IIRIDCS 


IIRMWTR 


IIRINHF 


IIRST 


IIREIOCS 


IIRSDR 


IIRINEIO 


IIRPR 


IIRBFEIO 


IIROACON 


IIRINBUF 


IIRMIM 


IIRTPMLU 


IIROBCON 




IIRMIC 


IIRMTMOD 


IIRCCPRO 






IlRNTDOS 


IlRCCMOD 






IIRVTDOS 


IIRSTR 






IIRDSMOD 


IIR14DEB 






IIRDSDOS 


IlREJR 






IIRDCC 








IIRDKO 








IIRIUDOS 








IIRIS 








IIRURMOD 








IIRDK1 





1410/7010 DISK FORMAT 



4 byfes 4 bytes I 4 bytes I 4 bytes 4 byti 



XTRK 
NMBR ' 



8 bytes 



"1 1 1 

track rec 
'number 'nm 

I I I BR 



PP I bb 
L_ 



SGMl 
LGTh 



2 by- 

tes I 4 bytes 



8 bytes 



n bytes 



5- 



' NUMBER NM 

J 1 I BR 



Each System/370 disk record represents one 1400 disk track. 



PP 


: Length of the S/370 physical record 

1301 Mod land 2 : 2,828 bytes 

1302 Or 2302 Mod 1 and 2 : 5,878 bytes 


bb 


: Set to zero 


XTRK 
NMBR 


Hex number of the 1400 track (first trk is 0) 
: First byte : bit = move mode 
= 1 load mode 


SGMT 
LOTH 


Sum of the length of the control information field 
: (14 bytes) and the 1400 data field 


LM 


: Bit = move mode 
= 1 load mode 


TRACK 
NMBR 


: Decimal number of the 1400 track 


REC 
NMBR 


: Decimal number of the record (first record is 0) 


** 


: Not used 



DISK FORMAT 


LOAD MODE 
CHARACTERS 


MOVE MODE 
CHARACTERS 


1301 

Models 1 and 2 

1302 or 2302 
Models 1 and 2 


2165 
4533 


2800 
5850 



Number of 1400 characters in System/370 Disk Records 



1410A010 TABLE OF REGISTER USAGE 



MODULE 


REGISTER CONTENTS AT ENTRY 


IIRCP 


3 - Address of the communication region 

4 - BAR 

5 - AAR 

7 - Base register 


IIRDK 


3 - Address of the communication region 

4 - BAR 

5 - AAR 

9 - Address of the DUB 
10 - Address of the ECCB 

14 - Return address 

15 - Entry point address 


IIRDL 


Same as IIRDK 


IIRDS 


- Code indentifying the function to be performed 

1 and 9 - Address of the DUB or the SUB 

3 - Address of the communication region 


ilREI 


- Code indentifying the function to be performed 

1 - Address of a DUB or SUB 


IIRID 


3 - Address of the communication region 

4 - BAR 

5 - AAR 

6 - lAR 

7 - Base register 

13 - Save area address 


IIRIU 


Same as IIRDS 


IIRMI 


Same as IIRCP 


IIRFDP 


Same as IIRCP 


ilRPR 


Same as IIRCP 


IIRST 


Same as IIRCP 


IIRMW 


- Address of variable text or zero 

1 - Message number of message to be issued 

13 - Address of caller's register save area 

14 - Return address 

15 - Entry point address 


IIRNT 


Same as IIRDS 


IIROA 


- Address of variable text or zero, or length of 681 60r 

operator's reply on return from IIRMIO 

1 - Message number of message to be issued or address of 

an operator's reply on return from IIRMIO 


IIROB 


- Length of the emulator command or contrcil statement 

1 - Address of the emulator command or control statement 


II ROC 

thru 

IIROK 


- Address of a parameter list 



1410/7010 TABLE OF REGISTER USAGE (.. ..Conf'd) 



MODULE 


REGISTER CONTENTS AT ENTRY 


IIRTP 


3 - 


Address of the communication region 






9 - 


Address of the SUB 






10 - 


Address of the ECCB 






13 - 


Address of caller's register save area 






14 - 


Return address 






15 - 


Entry point address and DILCNT interruption 


indication 


IIRSD 


3 - 


Address of the communication region 






13 - 


Address of caller's register save area 






14 - 


Return address 






15 - 


Entry point address 




IIRST 


3 - 


Address of the communication region 






7 - 


Base register 




IIRVT 


Same as 


IIRDS 





Note that GPR 15 is used for return codes by IIREI, IIRDS, IIRIU, 
IIRMW, IIRNT, IIRVT, and IIROC through IIROI and IIROK. 

The compatibility feature DIL instruction sets up GPR 4, GPR 5, 
GPR 6, and GPR 7 (the BAR, AAR, lAR, and entry point address 
for the routine given control), before giving control to an emulator 
program routine. The compatibility feature also uses GPR 2 as a 
work register. 



UlO/7010 PROBLEM DETERMINATION AIDS 
D ynamic Service Aids, format of emuiat-or commands : 



IDENTI- 
FICATION 


KEYWORD AND 
OPERANDS 


COMMENTS 


DISPLAY 


SWITCH 
REG 
STATUS 
TAPE L=cn] 

DISK[=cma] 

UR 

CONFIG 

ADDR=nnnnn 

XADDR=nnnnnn 


Displays on SYSLOG 

Status of the inquiry indicator 

lAR, AAR, BAR 

Switches and lAR, AAR, BAR 

Assignment of tape unit en (c=channel, n=unit) 
Default value is display all 

Assignment of disk storage one (c=channel,m=module, 

a=unit) 

Default value is display all 

Assignment of all unit record devices 

Assignment of all I/O devices 

40 Characters of 1400 core storage from 1400 decimal 
address 'nnnnn'. WM are displayed as one underscore 
Word separator as 2 (~) 

4 Fullwords of S/370 main storage data from 
hex address 'nnnnnn' 


DEBUG 


ACTION= fnnnnr^ 
<SET \ 
tRESETJ 

TYPE= fADSTOP"] 
^STEP } 

(trace J 


Emulates certain debugging functions. Only one is 
active at a given time. Next command cancels the 
effect of the previous one. 
DEBUG^YES must be coded in the EMSUP macro. 

'nnnnn' = 1400 stop address 

SET = enable TYPE=SET or TYPE^TRACE 

RESET = disable TYPE action 

ADSTOP = 1400 stop address emulation 

STEP = l/E Mode switch emulation 

TRACE = lists on SYSLST all 1400 instructions executed 

and AAR, lAR, BAR 


DUMP 


FROM=a,TO=b 
XFROM=a,XTO=b 


Dumps onto SYSLST the 1400 core storage or the S/370 
main storage. Default value is all 1400 core storage 
dumped. DEBUG=YES must be coded in the EMSUP macro 

1400 core storage (a and b are decimal from 1 to 5 
digits long. Default value is all core dumped. 

S/370 main storage (a and b are hex from 1 to 6 
digits long. Default is all storage dumped. 



CHAPTER VI 
BTAM 



I 



CONTROL BLOCK LINKAGES 



I/O Area 



, BTAM Module 



I/O Executor 
(EXCP) 



I/O Interrupt 
Handler 



I/O Error 
Routine 



Special Char. 



I 



Partition COMREG 



CSW 
Status Byte 



Logical 
Unit order 








1 


2 


3 


0( 0) 


LCB Count 


LCB Size 


Feature Flags 


4(4) 


Flag Byte 1 
or lAM 


WRU 


EOM 


EOT 


8( 8) 


DTFBT Flags 


Buffer Control Block Address 


12(0C) 


Device Code 


Address of CCW Model Table 


16(10) 


DTFBT Length 
13 


Address of BTAM Logic 


20(14) 


DTF Type + 
Code 


Flag Byte 2 


Message Length or 


Mondly 


24(18) 


Retry Count 


Address of Table of specific characters 


28(1C) 


2x Retry Count 


Line Error Block Address 


32(20) 


Address of Table of Offsets 


36(24) 


Reserved 


40(28)^ 


^CCB-LCB Area (S 


ee Line Control Blocks) 


i 




Buffer Pool (if an) 


f) 





DTFBT Table Explanation 



Byte(s) 


Description 


Meaning 


Source 


0(0) 
LCB Count 


The number of LCB's in this DTFBT 


Generated by the DTFBT 
macro by analyzing the 
LINELST keyword operand 


i(1) 
LCB Size 


The number of bytes in each LCB ia 
this DTFBT 


Computed by DTFBT macro 
expansion from the DE- 
VICE and FEATURE ope- 
rands 


2zl (2-3) 
Feature Flags 


Describes device features : 

First byte (2) 

Bit Configuration Meaning 

B'lOOOOOOO' SIX 
B '01 000000' SXW 
B' 11000000' SIW 
B'OOIOOOOO' RIX 
B'OOOIOOOO' RXW 
B'OOl 10000' RIW 
B '0000 1000' SLV 
B '00000 100' BSC 
B '00000010' Reserved 
B'OOOOOOOl' OIU 


DTFBT macro operand 
FEATURE 



DTFBT TABLE (....Cont'd) 



DTFBT Table Explanation 



Byte(s) 


Description 


Meaning 


Source 


2=1 (2-3) 
Feature Flags 
(Cont'd) 


Second byte (3) 

Bit Configuration Meaning 

B'lOOOOOOO' Station Control 

(STC) 
B'OIOOOOOO' Transmit Control 

(TRC) 
B '00100000' Checking (CHK) 
B'OOOIOOOO' PCI 
B '0000 1000' Start-stop Auto 

Poll 

Bits 5-7 of the second byte are 
reserved 




4 (4) 


Describes WTTA device feature 


DTFBT macro operand 


lAM or 




FEATURE 


Flag Byte 1 


Local 2260/Iocal 3270 Flags : 
Bit Configuration Meaning 

B'lOOOOOOO' On-line Termi- 


2260 local READ routine 
and Interruption handler/ 
BSC Message Analysis 
Routine 




nal Test Flag 
B'OOOIOOOO" Local 2260 and 




local 3270 






RESTPL Inhibit 






Flag 
B '0000 1000' Local 2260 and 






local 3270 NOP 






Wait Flag 






B'OOOOIOOO' BSC Valid First 






Character Flag 
(used by IJLM- 
ARTN) 
B '00000100' Local 2260 and 






local 3270 Read 






Wait Flag 
B '00000010' Local 2260 and 






local 3270 Res- 






can Flag 
B '0000000 r Load 2260 and 






local 3270 En^ 






able-Read-in- 






AppendageFlag 






The remaining bits are reserved. 






When bit zero is on , the next three 






bytes contain On-line Terminal Test 






Information, For the local 2260 and 






local 3270, the next three bytes 






contain a pointer to the DECB 




1 (5) 
WRU 


Describes WTTA device feature 


DTFBT macro operand 
FEATURE 


6 (6) 
EOM 


Character representing the end of a 
message (WTTA) 


DTFBT macro operand 
EOM 



DTFBT TABLE (....Cont'd) 



DTFBT Table Explanation 



Byte(s) 


Description 


Meaning 


Source 


I {7) 
EOT 


Character representing the end of a 
transmission (WTTA) 


DTFBT macro operand 
EOT 


8 (8) 
DTFBT Flags 


Bit Configuration Meaning 

B '00000001' DTFBT Open 
Flag 

B'OOOOOOlO' Non-partitioned 
channel program 
flag 

B '00000 100' Switched net- 
work flag 

B'OOOOIOOO' Multipoint con- 
figuration (BSC) 

The remaining bits are reserved 


The switched-n^twork 
flag, the multipoint flag 
and the non-partitioned 
channel program flag are 
put in at assembly time. 
The open flag is maintained 
by the OPEN and CLOSE 
routines. 


9-11 (09-OB) 
Buffer Control 
Block Address 




Put in at assembly time 
by the DTFBT macro 


12 (OC) 
Device Code 


Numeric identifier of the type of 

device attached to the lines of this 

group 

Devices Equated to 

1030 1 
1060 2 
2848 3 
83B3 4 
115A 5 
2260 6 
1050 7 
2740 8 
TWX33 9 
TWX35 10 
1130 12 
2780 13 
WTTA 14 
2020 15 
3277 17 


Put in by the DTFBT macro 
using the DEVICE keyword 
operand 


13-15 (OD-OF) 
CCW Model 
Table Address 




Put in by the Linkage 
Editor 


16(10) 
DTFBT Length 
16 




Put in at assembly time 


17-19 (11-13) 
Address of 
BTAM Logic 




Put in by the Linkage 
Editor 


20 (14) 
DTF-fCU 


Numeric identifier of the DTF type 
and the control unit type 


Initialized at assembly 
time from the CU keyword 
operand 



DTFBT TABLE (....Cont'd) 



DTFBT Table Explanation 



Byte(s) 


Description | 


Meaning 


Source 


20 (14) 
DTF-tCU 
(Cont'd) 


The DTF code is X'40' for a DTFBT. 
The following CU codes are OR'ed 
into the low-order 4 bits: 
Control Unit Equated to 




7770 1 
2848 3 

2701 4 

2702 5 

2703 6 
3272 7 


21 (15) 
Flag Byte 2 


Flags for ERP: 

Bit Configuration Meaning 

B '00000100' ERP requested 
B'OOOOOOlO' Read text retry 
B'OOOOOOOr Write text retry 

The remaining bits are reserved 


Flags ore set by the 
ERROPT operand 


22-23 (16-17) 
Message Length 
or __ __ 




DTFBT macro operand 
MSGL 


MONDLY 


Number of pad characters (WTTA) 


DTFBT macro Operand 
MONDLY 


24(18) 
Retry Count 


BSC Retry Ceiling 


DTFBT macro operand 
RETRY 


25-27 (19-lB) 
Address of 
Table of special 
Characters 




Put in by Linkage Editor 


28 (IC) 

2x Retry Count 


2x BSC Retry Ceiling 


DTFBT macro operand 
RETRY 


29-31 (ID-IF) 
Line Error 
Block Address 




DTFBT macro operand 
LERBADR 


32-35 (20-23) 
Table of 
Offsets 


Pointers to the table of model 
CCW's corresponding to operation 
types defined for a particular device 
The displacement in the Table of 
Offsets corresponds to the operation 
code for the macro. An X'FF' at 
displacement 07 in the table, for 
example, means that optype X'07' 
(READ Repeot-TP) is not available. 

Operation Type Codes 

Code Macro 

X'OO' WRITE DISCONNECT 
X'OT READ INITIAL 
X'02' WRITE INITIAL 


Generated by the DTFBT 
macro from the DEVICE 
operand 



DTFBT TABLE (....Cont'd) 
DTFBT Table Explanation 



Byte(s) 



Description 



Meaning 



32-35(20-23) 


Code 


Macro 


Table of 

Offsets 

(Cont'd) 


X'03' 


READ CONTINUE 


X'04' 


WRITE CONTINUE 


X'05' 


READ CONVERSATIO- 






NAL 




X'05' 


READ CONTINUE WITH 
GRAPHICS 




X'06' 


WRITE CONVERSATIO- 
NAL 




X'07' 


READ REPEAT 




X'08' 


WRITE ACK 




X'08' 


WRITE IN IT TRANSPA- 
RENT BLOCK 




X'09' 


READ INITIAL INQUIRY 




X'09' 


READ SKIP 




X'OA' 


WRITE NAK 




X'OA' 


WRITE INITIAL TRANS- 
PARENT TEXT 




X'OB' 


READ BUFFER 




X'OB' 


READ REPEAT WITH 
GRAPHICS 




X'OC 


WRITE AT LINE ADDR. 




X'OC 


WRITE INIT TRANSPA- 
RENT CONVERSATIO- 
NAL 




X'OD' 


READ SHORT 




X'OD' 


READ INQUIRY 




X'OE' 


WRITE ERASE 




X'OE' 


WRITE INITIAL CON- 
VERSATIONAL 




X'OF' 


READ CONTINUE WITH 
IDENTIFICATION EX- 
CHANGE (WT TELE- 
GRAPH) 




X'lO' 


WRITE INVITATIONAL 




X'lO' 


WRITE TRANSPARENT 
BLOCK 




x'lr 


READ INTERRUPT 




x'lr 


READ MODIFIED 




X'12' 


WRITE TRANSPARENT 
TEXT 




X'12' 


WRITE INITIAL OPTI- 
CAL 




X'12' 


WRITE UNPROTECTED 
ERASE 




X'I3' 


READ CONTINUE WITH 
LEADING ACKNOW- 
LEDGEMENT 




X'13' 


READ CONNECT 




X'13' 


READ BUFFER FROM 
POSITION 



DTFBT TABLE (....Cont'd) 



DTFBT Table Explanation 



Byte(s) 


Description | 


Meaning 


Source 


32-35 (20-23) 
Table of 
Offsets 
(Cont'd) 


Code Macro 

X'14' WRITE TRANSPARENT 
CONVERSATIONAL 

X'14' WRITE INVITATIONAL 
OPTICAL 

X'15' READ CONNECT WITH 
TONE 

X'16' WRITE EOT 

X'16' WRITE CONVERSATIO- 
NAL OPTICAL 

X'18' WRITE WACK 

X'19' READ MODIFIED FROM 
POSITION 

X'lA' WRITE INQUIRY 

X'lB' CONTROL INITIAL 

X'lC CONTROL DISABLE 

X'lD' CONTROL MODE 

X'lE' CALL SEGMENT 

X'lF' ANSWER 

X'20' WRITE CONNECT 




36-39 (24-27) 
Reserved 






40-XX(28-..) 
Line Control 
Blocks 


Line control blocks describe the 

particular line 

(See Line Control Block for detailed 

description) 


One LCB is generated 
at assembly time for each 
line in the LINELST ope- 
rand sublist 


XX-XX (..-.. 

Buffer Pool 


(Optional) 





LINE CONTROL BLOCK 



0(0) 



16(10) 
20(14) 



24(18) 
32(20) 
40(28) 

104(68) 

108(6C) 
112(70) 



1 


2 


3 1 


CCB 


Flag Byte 


DECB Address | 


Relative Line No 


Send ; Rcve 
Ack ] Ack 
""LrcaT~3270 
Flag Byte 


Reserved 


Mode Byte (BSC) 


ERP Message Code and Status Save Area 


CCW Area reserved for ERP and Aud 


o 




User Channel Program Area 


Marker (BSC) 


Total User CCW 
Retries (BSC) 


User CCW 
Retries (BSC) 


ERP CCW Retries 
(BSC) 


BSC Flag Byte 1 


BSC Flag Byte 2 


BSC Flag Byte 3 


Reserved 


BSC ERP CCW Area (3 double-words) J 



Line Control Block Explanation 



Byte(s) 


Description 


Meaning 


Source 


0-15 (00-OF) 
CCB 


Command Control Block 


Space is reserved by the 
DTFBT instruction. The 
contents of the block are 
maintained by the Super- 
visor, IJLCPGXand 
IJLBTIH. 


16(10) 

LCB Flag Byte 


Used to indicate LCB Conditions 
Bit Configuration Meaning 

B' 10000000' Last LCB in line 
group 

B'OIOOOOOO' Line error at 
Open (except 
for local 2260 
and local 3270 

B'OIOOOOOO' Local 2260 or 

local 3270 Read 
started from 
Appendage 


These flags are initialized 
by the DTFBT macro in- 
struction. IJLCPGX, 
IJLBTIH and OPEN main- 
tain them. 



LINE CONTROL BLOCK (. . . .Cont'd) 



Line Control Block Explanation 



Byte(s) 


Description | 


Meaning 


Source 


Ik (10) 

LCB Flag Byte 
(Cont'd) 


Bit Configuration Meaning 

B'OOIOOOOO' Halt I/O reques- 
ted 

B'OOOIOOOO' LCB Cancel flag 
(ERP) 

B'OOOOIOOO' Write at Line 

Address (remote 
2260), LCB Q- 
flag (local 2260 
or local 3270) 

B'OOOOOlOO' Attention flag 
(local 2260 or 
local 3270), 
Terminal Test 
flag (OIU) 

B'OOOOOOlO' Skip flag (local 
2260 or local 
3270), Frame 
Change Test flag 
(OIU) 

B '0000000 1' Printer flag (lo- 
cal 2260 or lo- 
cal 3270), Mes- 
sage from OIU 
flag (OIU) 

B '0000000 r Re-read flag 
(WTTA) 

B '00000001' Auto Poll chan- 
nel program mo- 
dified flag (BSC) 




17-19 (11-13) 
DECB Address 




This field is set to zero 
by the completion logic; 
The address is supplied 
by iJLCPGX 


20(14) 
RLN 


Relative Line Number 


The relative line number 
is inserted by the DTFBT 
macro instruction 


21(15) 
Send ACK/ 
RcveACK or 






Local 3270 
Flag Byte 


Bit Configuration Meaning 




B' 10000000' Printer busy flag 

B '01000000' Unreliable devi- 
ce buffer content 

B'OOIOOOOO' RFT in progress 
flag 

B'OOOIOOOO' Start original 
READ flag (RFT 
flag) 

B'OOOOIOOO' I/O request flag 



I 



LINE CONTROL BLOCK (. . . .Cont'd) 



Line Control Block Explanation 



Byte(s) 


Description 1 


Meaning 


Source 


22(16) 
Reserved 






23(17) 
Mode Byte 


Used for Set Mode 


Initialized at assembly 
time; Updated via CON- 
TROL 


24-31 (18-lF) 
ERP Code and 


Error Message Code (byte 24) 


The hex value (1-byte) 
of the error message num- 
ber to be printed is inser- 
ted by the routine that 
determined the error con- 
dition 


Status Save 
Area 


CSW bytes 1-7 (but not byte 0) 
(bytes 25-31) 


The CSW is saved for the 
last user (non-ERP) CCW 
that completed 


32-39 (20-27) 
ERPCCW 




CCW is set up and execu- 
ted in an attempt to re- 
cover from the error con- 
dition 


40-103(28-67) 
CCW Space 


Channel Program Area 


IJLCPGX builds the 
channel program in this 
space 


104-107(68-66 


) 




Marker and 
Retry Bytes 


108 (6C) 

BSC 

F lag Byte 1 


Bit 0: 1= ENQ can be legally re- 
ceived 
0= ENQ an illegal response 
to text 

Bit 1: 1= Last response-to-text was 
NAK (i.e., NAK was sent 
to remote station as the 
response to the last recei- 
ved message) 

Bit 2: 1= No response was received 
to previous Write text 

Bit 3: 1= No retry flag 

Bit 4: 1= Error occurred on an ERP 
CCW 

Bit 5: 1= ERP in process (due to 
Unit Check) 

Bit 6: 1= Error occurred on a Read 
Response to text or a Read 
text in a conversational 
WRITE channel program 

Bit 7: 1 = First retry of the error dis- 
cussed for bit 6 





LINE CONTROL BLOCK (....Cont'd) 



Line Control Block Explanation 



Byte(s) 


Description 


Meaning 


Source 


109 (6D) 

BSC 

Flag Byte 2 


For any READ/WRITE macro other 
than WRITE Inquiry (TO) with entry 
coded 'S', the Operation flag byte 1 
in the DECB is moved into the BSC 
flag byte 2 in the LCB 

For WRITE Inquiry (TO) with entry 
not coded 'S' bit-2 (B'OOlOOdOOT 
of the BSC flag byte 2 in the LCB is 
turned ON subsequent to the moving 
in of the DECB Operation flag byte 1 

Note: 

For WRITE Inquiry (TO) with entry 
coded 'S', the BSC flag byteTTT 
the LCB Extension will contain the 
value set by IJLCPGX for the most 
recently issued macro (normally an 
initial-type WRITE for dial opera- 
tion) that was not a WRITE TQ with 
entry coded 'S' 


Initialized by IJLCPGX 


nO(6E) 

BSC 

Flag Byte 3 


Bit 0: BTAM initiates terminal test 
Bit 1: LCB in test flag 
Bit 2: X= flog for on-line test 
Bit 3: Invalid character in RFT 
Bit 4: RESETPL flag for TERM test 
Bit 5: Positive response to line bid 

has been received 
Bit 6; Remote 3270 RFT BSC flag 
Bit 7: Reserved 




]ii(6F) 
Reserved 




• 


112-135(70-87 
BSC ERP CCW 


) BSC ERP CCW Area (3 double-words) 





DATA EVENT CONTROL BLOCK (DECB) 








■' 1 2 


3 




0(0) 


Completion Code 


Reserved for DOS/BTAM internal use 

(See explanantion of bit 6 of the flag byte) 


4( 4) 


Optype Qualifier 
bifs 


Optype Code 


Length 


8(8) 


Response Informa- 
tion Byte 


DTFBT Address 


12(0C) 


Mode Byte 


Input/Output Address 


16(10) 


Sense Byte 


Sense byte for 
Diagnostic Read/ 
Write 


Residual Count 


20(14) 


Command Code 


List Address or Entry Address 


24(18) 


Flag byte 


Relative Line 
Number 


Response to 
Addressing Field 


Response to 
and/or VRC 


LRC 


28(1 C) 


TP Code 


Error Information 


Status Bytes 


32(20) 


Reserved 


Addressing Pointer 


36(24) 


Reserved 


Polling or Scanning Pointer 


40(28) 


Flog Bytes for 
extended DECB 


Reserved 


Auxlength 


44(2C) 


Reserved 


Auxarea Address 



Note: The first four (4) bytes of the DECB are called the Event Control Block 

(ECB), The lost eight (8) bytes of the DECB are called the DECB extension. 

DECB Explanation 



Byte(s) 


Description 




Meaning 


Source 


(0) 


X'OO' 


Operation in progress 


Maintained by IJLCPGX 


Completion 


X'TF' 


Normal completion 


and IJLBTIH 


Code 


X'4V 


I/O error 






X'44' 


Terminal ID non-comparison 






X'48' 


HALT I/O requested and 
completed 






X'50' 


Contention (BSC or WTTA) 






X'51' 


End-of-file condition 






X'52" 


Wrong length record 






X'54' 


Non-productive operation 






X'58' 


Cancel condition detected 






X'60' 


Wrong ACK-i received 
(i=Oorl) 






X'6r 


WACK received or RVl re- 
ceived in response to selec- 
tion on a multipoint line 






X'62' 


ENQ received in response 
toENQ 






X'64' 


Unreliable device buffer 
contents 





DATA EVENT CONTROL BLOCK (DECB) (. . . .Cont'd) 



Byte(s) 


Description 


Meaning 


Source 


U3 (1-3) 
Reserved 


Reserved for DOS/BTAM internal use 
(See explanation of bit 6 of the flag 
byte) 




4(4) 

Optype Quali- 
fier bits 


Flags are set according to the type 

of operation 

Bit Configuration Meaning 


Set by READ, WRITE and 
CONTROL 


B' 10000000' Initial optype 
B '01 000000' Reset optype 
B '00 100000' 2260 local lock 

operation 
B'OOOIOOOO' Conversational flag 
B'OOOIOOOO' Skip buffer check 

flag (local 3270 for 

RFT) 
B'OOOOIOOO' Start-stop; Auto 

Poll used in current 

operation 
B'OOOOOlOO' Entry 'S' 
B '00000010' Area 'S' 
B '00000001' Length's' 


5 (5) 

Optype Code 
(See DTFBT 
Table) 


Operation type code of the last exe- 
cuted I/O macro instruction 


Set by READ, WRITE and 
CONTROL 


6^ (6-7) 
Length 


The amount of data to be transmitted 
or received 


Length operand of READ 
or WRITE macro instruct. 


8 (8) 
Response 
Information 
byte 


Bit Configuration Meaning 




B '000000 10' An RVI has been 

received in respon- 
se to selection 


9-11 (09-OB) 
DTFBT Address 


Specifies the line group 


Operand of READ, WRITE 
or CONTROL 


11(00 
Mode byte 


Used for Set Mode 


Set by IJLCPGX 


13-15 (OD-OF) 

Input/Output 

Address 




Area operand of READ, 
WRITE or CONTROL 


i6 (10) 
Sense byte 


Bit Configuration Meaning 

B'lOOOOOOO' Comnand reject 
B'OIOOOOOO' intervention req'd 
B'OOIOOOOO' Bus-out check 
B'OOOIOOOO' Equipment check 
B'OOOOIOOO' Data check 
B'OOOOOlOO' Overrun or, for 

local 3270, unit 

specify 


Stored by IJLBTIH when 
an unit check has occurred 



DATA EVENT CONTROL BLOCK (DECB) (. . . .Cont'd) 



Byte{s) 


Description | 


Meaning 


Source 


16(10) 
(Continued) 


Bit Confrguration Meaning 

B '000000 10' Lost data or, for 
local 3270, con- 
trol check 

B '0000000 r Time out or, for 

local 3270, opera- 
tion check 




IZ(ii) 

Sense byte for 

diagnostic 

READ/AVRITE 






18-19(12-13) 
Residual count 


The remaining amount of data which 
was not transmitted 


Stored by IJLBTIH from 
the CCB and CSW 


20(14) 

Command 

code 


Contains the command code 


Stored by IJLBTIH when 
completion has occurred 


21-23(15-17) 
Entry Address 


Address of terminal list entry 


Initialized from entry 
operand of READ or 
WRITE; maintained by 
IJLBTIH 


24(18) 
Flag byte 


operation 

Bit Configuration Meaning 

B' 10000000' PCI occurrence 
B '01 000000' EOT received 

(BSC or WTTA) 
B'OO 100000' DLE EOT recei- 
ved (BSC) orWRU 
(WTTA) 
B '000 10000' Stop flag 
B '000 10000' Error status mes- 
sage received 
(BSC) 
B'OOOOIOOO' Enable flag 
B '00000 100' Indicates read 

buffers on a con- 
versational WRITE 
B '00000010' Indicates ECB 

bytes 1, 2 and 3 
contain address of 
first unre leased 
buffer not used at 
completion of a 
READ with area 'S 
B '0000000 1 ' Terminal test 
operation 


Set by IJLCPGX 



DATA EVENT CONTROL BLOCK (DECB) (. . . .Cont'd) 



Byte(s) 


Description 


Meaning 


Source 


25(19) 


Position of line entry in list 


From macro instruction 


Relative line 




operand 


number 






26 (lA) 


Space reserved for response to add- 


Channel program reads 


Response to 


ressing 


into this field 


Addressing 






2Z(1B) 






Read response 






to redundancy 






check 






28 (IC) 


TP code of last command 


Maintained by IJLBTIH 


TP Code 




and IJLCPGX 


29(1D) 


ERP information 


Set by IJLBTIH 


Error Informa- 


Bit Configuration Meaning 




tion 


B '01000000' Should-not-occur 
error 

B '00100000' Error in ERP 

B'OOOIOOOO' Diagnostic WRITE 
READ failed 

B'OOOOOOlO' ENQ received in 
text (BSC) 

B '0000000 r NAK response to 
text (BSC) 
NAK or ID-NAK 
response to ID- 
ENQ (BSC) 




30-31(lE-1F) 


Bytes are set when an event occurs 


Set by IJLBTIH from the 


Status bytes 




CSW 


32(20) 






Reserved 






33-35(21-23) 


Address of terminal being addressed 


Set by IJLCPGX 


Addressing 






Pointer 






36 (24) 






Reserved 






37-39 (25-27) 


Address of terminal being polled or 


Set by IJLCPGX 


Polling or 


scanned 




Scanning poin- 






ter 






40 (28) 


Flags are set according to the type 


READ/WRITE 


DECB extension 


of operation using the DECB exten- 




flag byte 


sion 

Bit Configuration Meaning 

B' 10000000' Auxarea 'S' 





DATA EVENT CONTROL BLOCK (DECB) (....Cont'd) 



Byte(s) 


Description 1 


Meaning 


Source 


41 (29) 
Reserved 






42-43 (2A-2B) 
Aux length 


The amount of data to be transmitted 
or received by operations using the 
DECB extension 


READ/WRITE 


44 (2C) 
Reserved 






45-47(20 -2F) 
Auxarea 


Address of data to be transmitted or 
input area for operations using the 
DECB extension 


READ/WRITE 
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CHAPTER I POWER/VS 

A 

ACB (account control block) 1-74, 1-75 



BCA (buffer control area) 1-80 to I-! 
BCW (buffer control word) 1-68 
BSC (line manager TCB fields) 1-85 
buffer control area (see BCA) 
buffer control word (see BCW) 
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MCB (module control block) 1-64, 1-65 
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INDEX (continued) 

CHAPTER I POWER/ZS (continued) 



open 3540 Diskette Work Space 1-83 
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operator command language, remote (see ROCL) 
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queue record 1-03 
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queue set 1-03, 1-04 
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requirements, programming 1-01 

RJE I/O trace 1-94 
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overview 1-17, 1-18 

queue management commands 1-19 to 1-21 

task management commands 1-18, 1-19 

terminal commands 1-18 



SCB (storage control block) 1-36, 1-37 
service aids 

file dump program 1-99, 1-100 

RJE I/O trace 1-99 
SLI Work Space 1-73 
SNA control block 1-86 
SNA remote control block 1-87 
SNA unit control block |-91 
SNA work area 1-95 
SNA message control block 1-97 
SNA manager TCB fields 1-98 
storage control block (see SCB) 
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CHAPTER I POWEiyVS (continued) 

T 

tape control block (see TBB) 

task control block (see TCB) 
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TBB (tape control block) 1-66 
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W 

wait control block (see WCB) 
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CHPATER II VTAM CONTROL BLOCKS 
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